Destination given bearing on a great circle

Time bar (total: 19.5s)

analyze1.3s (6.8%)

Memory
-5.9MiB live, 1 261.0MiB allocated
Algorithm
1×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.7s (14%)

Memory
129.8MiB live, 2 426.9MiB allocated
Samples
2.3s8 256×0valid
Precisions
Click to see histograms. Total time spent on operations: 1.9s
ival-sin: 724.0ms (37.8% of total)
ival-cos: 525.0ms (27.4% of total)
ival-mult: 322.0ms (16.8% of total)
ival-asin: 128.0ms (6.7% of total)
ival-add: 98.0ms (5.1% of total)
ival-atan2: 73.0ms (3.8% of total)
ival-sub: 36.0ms (1.9% of total)
ival-true: 6.0ms (0.3% of total)
ival-assert: 3.0ms (0.2% of total)
Bogosity

preprocess265.0ms (1.4%)

Memory
-14.5MiB live, 71.7MiB allocated
Algorithm
2×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
13933
26433
37933
49533
512333
617133
721733
830333
934433
1037833
1143033
1252133
1365533
1480833
15110333
16117533
17119733
18119933
19120233
20120433
0120432
Stop Event
1×iter limit
1×saturated
1×node limit
Calls
Call 1
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)))))))))
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)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
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)

explain438.0ms (2.2%)

Memory
-4.3MiB live, 391.5MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
101(-6.9606612245439595e-264 -2.283057290287993e+270 5.547157355283115e+88 2.363255437201287e-302 4.0122029227123905e-75)5(-9.267051263842957e-292 1.007834886383694e+120 2.104672850447379e-108 3.923898800865076e-61 -5.289153442210526e+137)(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))
10-1(-4.2591899639088834e-249 5.4096372188071625e+255 1.7382825803657646e-194 -1.0949710007533477e-307 9.930987033388237e-11)(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta))))))))
10-1(4.44023465769178e+38 -8.985919971267388e+220 1.3216127136523306e+283 -9.828273258881933e-30 -1.1465660685588723e-163)(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-(+.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-(cos.f64 phi1)
Confusion
Predicted +Predicted -
+04
-0252
Precision
0/0
Recall
0.0
Confusion?
Predicted +Predicted MaybePredicted -
+040
-02250
Precision?
0.6666666666666666
Recall?
1.0
Freqs
test
numberfreq
0256
Total Confusion?
Predicted +Predicted MaybePredicted -
+010
-000
Precision?
1.0
Recall?
1.0
Samples
209.0ms512×0valid
Compiler

Compiled 474 to 96 computations (79.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 179.0ms
ival-mult: 71.0ms (39.6% of total)
ival-sin: 48.0ms (26.8% of total)
ival-cos: 30.0ms (16.7% of total)
ival-sub: 13.0ms (7.3% of total)
ival-asin: 8.0ms (4.5% of total)
ival-add: 5.0ms (2.8% of total)
ival-atan2: 4.0ms (2.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

eval0.0ms (0%)

Memory
0.3MiB live, 0.3MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

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

Compiled 38 to 23 computations (39.5% saved)

simplify61.0ms (0.3%)

Memory
6.1MiB live, 53.0MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.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)))))))))
Rules
640×accelerator-lowering-fma.f32
640×accelerator-lowering-fma.f64
496×*-lowering-*.f32
496×*-lowering-*.f64
256×associate-*r*
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022197
139197
264197
379197
495197
5123197
6171197
7217197
8303197
9344197
10378197
11430197
12521197
13655197
14808197
151103197
161175197
171197197
181199197
191202197
201204197
01204190
Stop Event
1×iter limit
1×saturated
Calls
Call 1
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)))))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(sin theta)
theta
(sin delta)
delta
(cos phi1)
phi1
(- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
(cos delta)
(* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))
(sin phi1)
(sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))
(asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
(* (sin phi1) (cos delta))
(* (* (cos phi1) (sin delta)) (cos theta))
(* (cos phi1) (sin delta))
(cos theta)
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)))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(* (* (sin theta) (sin delta)) (cos phi1))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(* (sin theta) (sin delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin theta)
(sin.f64 theta)
theta
(sin delta)
(sin.f64 delta)
delta
(cos phi1)
(cos.f64 phi1)
phi1
(- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(cos delta)
(cos.f64 delta)
(* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))
(*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(sin phi1)
(sin.f64 phi1)
(sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))
(sin.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(* (sin phi1) (cos delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (* (cos phi1) (sin delta)) (cos theta))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(* (cos phi1) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(cos theta)
(cos.f64 theta)

localize108.0ms (0.6%)

Memory
6.5MiB live, 83.0MiB allocated
Localize:

Found 4 expressions of interest:

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

Compiled 199 to 25 computations (87.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 67.0ms
ival-sin: 35.0ms (51.9% of total)
ival-cos: 14.0ms (20.8% of total)
ival-mult: 9.0ms (13.3% of total)
ival-asin: 4.0ms (5.9% of total)
ival-add: 2.0ms (3% of total)
ival-atan2: 2.0ms (3% of total)
ival-sub: 1.0ms (1.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series36.0ms (0.2%)

Memory
1.2MiB live, 39.0MiB allocated
Counts
7 → 252
Calls
Call 1
Inputs
#<alt (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))))>
#<alt (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))>
#<alt (* (* (sin theta) (sin delta)) (cos phi1))>
#<alt (* (sin theta) (sin delta))>
#<alt (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))>
#<alt (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))>
#<alt (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))>
Outputs
#<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 (* (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 (- 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 (* 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 (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)))))>
Calls

63 calls:

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

rewrite700.0ms (3.6%)

Memory
-154.8MiB live, 513.7MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
6 986×accelerator-lowering-fma.f32
6 986×accelerator-lowering-fma.f64
5 942×*-lowering-*.f32
5 942×*-lowering-*.f64
3 900×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
022125
1101125
2827125
08718120
Stop Event
1×iter limit
1×node limit
Counts
7 → 264
Calls
Call 1
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)))))))))
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(- (cos delta) (* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta)))))))
(* (sin phi1) (sin (asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))))
(asin (+ (* (sin phi1) (cos delta)) (* (* (cos phi1) (sin delta)) (cos theta))))
Outputs
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))
(fma.f64 (*.f64 lambda1 lambda1) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (neg.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(neg.f64 (/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))))))
(neg.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 9 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (+.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 6 binary64))) (pow.f64 (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 4 binary64))) (pow.f64 (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))) (+.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))))
(*.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(*.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #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))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (cos.f64 phi1) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (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 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 1/2 binary64))
(+.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(fma.f64 (cos.f64 (-.f64 theta delta)) #s(literal 1/2 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))
(neg.f64 (/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal -2 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -1/2 binary64))
(+.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta))
(+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (cos.f64 delta)))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(+.f64 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta)))
(-.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (-.f64 #s(literal 1/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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 delta))
(fma.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (neg.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (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 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 1/2 binary64) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (sin.f64 phi1) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (sin.f64 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 delta))
(fma.f64 (*.f64 (-.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 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(fma.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal -1 binary64)) (sin.f64 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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)) (sin.f64 phi1)) (cos.f64 delta) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (cos.f64 delta)))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1)) (cos.f64 delta) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 delta phi1)))) #s(literal 1/2 binary64) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 delta phi1)))) #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (cos.f64 delta)))
(fma.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal -1 binary64)) (sin.f64 phi1) (cos.f64 delta))
(fma.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 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)) (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)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta)))
(fma.f64 (*.f64 (-.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)))
(neg.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta)))))
(/.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta)))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta))))))
(/.f64 (+.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 9 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 6 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 6 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 4 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (*.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta)))
(/.f64 (-.f64 (*.f64 (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))) (+.f64 (/.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (*.f64 (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (cos.f64 delta))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(*.f64 #s(literal 1 binary64) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
(*.f64 (+.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
(+.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))
(+.f64 (*.f64 (-.f64 #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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (-.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 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(fma.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 delta phi1)))) #s(literal 1/2 binary64) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)))
(fma.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (*.f64 (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) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (sin.f64 phi1))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (*.f64 (-.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 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (sin.f64 phi1))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) #s(literal 3 binary64))) (+.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 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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))) (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (-.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)) #s(literal 3 binary64))) (+.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 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(/.f64 (-.f64 (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (*.f64 (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (*.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)))) (+.f64 (/.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #s(literal -1 binary64))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1))
(*.f64 (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) phi1)) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (-.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (cos.f64 (+.f64 phi1 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(*.f64 (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(*.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))))
(*.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64))) (sin.f64 phi1)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (neg.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 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 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))
(-.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (/.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(-.f64 (/.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (/.f64 (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(fma.f64 (PI.f64) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(fma.f64 #s(literal 1 binary64) (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (PI.f64)) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))))) (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) (*.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
(/.f64 (-.f64 (pow.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64))) (+.f64 (*.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))) (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64))))) (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64))) (+.f64 (fabs.f64 (remainder.f64 (+.f64 (asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (PI.f64)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (PI.f64)) #s(literal 8 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (*.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (+.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))
(*.f64 (-.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4 binary64)) (pow.f64 (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))

simplify597.0ms (3.1%)

Memory
11.9MiB live, 681.4MiB allocated
Algorithm
1×egg-herbie
Rules
18 372×accelerator-lowering-fma.f32
18 372×accelerator-lowering-fma.f64
5 632×*-lowering-*.f32
5 632×*-lowering-*.f64
5 026×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02405237
18335126
229515083
353375038
475685038
084754804
Stop Event
1×iter limit
1×node limit
Counts
252 → 252
Calls
Call 1
Inputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(* phi1 (* (cos theta) (sin delta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (+ (* -1/3 (* phi1 (cos delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(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)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
Outputs
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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)))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))) lambda1)) 1)))
(+.f64 lambda1 (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 1 binary64)))
(+ 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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta)))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (*.f64 theta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta))))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (sin.f64 delta) theta))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (sin.f64 delta) (*.f64 theta (*.f64 theta (*.f64 (sin.f64 delta) (+.f64 (*.f64 (*.f64 theta theta) (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 binary64)))) #s(literal -1/6 binary64)))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta 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) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.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))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 (*.f64 delta (*.f64 delta (+.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64))))) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta))))
(- (+ 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 (*.f64 delta (*.f64 delta (+.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (*.f64 delta #s(literal 1/6 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 #s(literal 1/2 binary64) (sin.f64 phi1))))))) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.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))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 #s(literal 2/3 binary64) phi1)) (cos.f64 delta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(- (+ (cos delta) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/24 binary64)))))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/24 (* (cos phi1) (* (sin delta) (sin phi1)))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 phi1)) (+.f64 #s(literal -1/24 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/720 binary64))))))) (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.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 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 (*.f64 (sin.f64 delta) phi1) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64)))))))
(* 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 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (*.f64 phi1 (cos.f64 delta)) #s(literal -1/3 binary64))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(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) (+.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta))))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) delta)) (*.f64 (+.f64 (*.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))
(+.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (+.f64 (*.f64 delta (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 delta (*.f64 delta #s(literal -1/6 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(+ (* -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) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+.f64 (*.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #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)))))))))
(+.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/720 binary64))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(asin (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(asin.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))

eval76.0ms (0.4%)

Memory
12.1MiB live, 128.7MiB allocated
Compiler

Compiled 26 180 to 1 642 computations (93.7% saved)

prune119.0ms (0.6%)

Memory
-22.9MiB live, 136.3MiB allocated
Pruning

28 alts after pruning (28 fresh and 0 done)

PrunedKeptTotal
New48828516
Fresh000
Picked101
Done000
Total48928517
Accuracy
100.0%
Counts
517 → 28
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
68.8%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
99.4%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
99.7%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
▶99.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (cos.f64 delta))))
88.4%
(+.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)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (-.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))))) (cos.f64 delta))))
99.7%
(+.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)) (*.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)))))
▶99.7%
(+.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)) (*.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)))))
99.7%
(+.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 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.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 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
91.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.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (/.f64 (sin.f64 phi1) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))
77.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 phi1) (cos.f64 theta)) (*.f64 (cos.f64 phi1) delta)) (*.f64 (+.f64 (*.f64 delta (*.f64 delta #s(literal -1/2 binary64))) #s(literal 1 binary64)) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))) (sin.f64 phi1)))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
94.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))))
84.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta)))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
82.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))))
▶72.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
79.2%
(+.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)))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
79.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta)))))
87.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
61.1%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (asin.f64 (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (cos.f64 theta)))))))))
68.8%
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) #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))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)))
▶70.3%
lambda1
Compiler

Compiled 2 308 to 1 334 computations (42.2% saved)

simplify580.0ms (3%)

Memory
33.6MiB live, 578.6MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 16 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(+.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)) (*.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)))))
✓cost-diff64
(neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta)))
✓cost-diff6400
(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)))
✓cost-diff6528
(+.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1)))) (cos.f64 delta))) (cos.f64 delta))
✓cost-diff0
(cos.f64 phi1)
✓cost-diff0
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
✓cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓cost-diff6592
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
✓cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))
✓cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
✓cost-diff6272
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))
✓cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta)))
✓cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))))
✓cost-diff12928
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
Rules
19 620×accelerator-lowering-fma.f32
19 620×accelerator-lowering-fma.f64
4 284×*-lowering-*.f32
4 284×*-lowering-*.f64
2 436×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
055620
1134614
2345601
3922578
42248578
53497578
64531578
75864578
86594578
96953578
107011578
117015578
127016578
08136564
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta)))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(sin theta)
theta
(sin delta)
delta
(cos phi1)
phi1
(+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))
(- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta)))))
0
(+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))
(* (cos delta) (sin phi1))
(cos delta)
(sin phi1)
(* (sin delta) (* (cos phi1) (cos theta)))
(* (cos phi1) (cos theta))
(cos theta)
lambda1
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(sin theta)
theta
(sin delta)
delta
(cos phi1)
phi1
(- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))
(cos delta)
(* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))
(+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))
(* (sin delta) (cos theta))
(cos theta)
(* phi1 (cos delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(cos phi1)
phi1
(* (sin delta) (sin theta))
(sin delta)
delta
(sin theta)
theta
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(* (- 1 (pow (sin phi1) 2)) (cos delta))
(- 1 (pow (sin phi1) 2))
1
(pow (sin phi1) 2)
(sin phi1)
2
(cos delta)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(* (cos phi1) (* (sin delta) (cos theta)))
(* (sin delta) (cos theta))
(cos theta)
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(sin theta)
theta
(sin delta)
delta
(cos phi1)
phi1
(+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))
(* (- 0 (sin phi1)) (* (cos theta) (cos phi1)))
(- 0 (sin phi1))
0
(sin phi1)
(* (cos theta) (cos phi1))
(cos theta)
(+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))
(neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))
(* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
1/2
(* 1/2 (cos (* 2 phi1)))
(cos (* 2 phi1))
(* 2 phi1)
2
(cos delta)
Outputs
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))
(* (* (sin theta) (sin delta)) (cos phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (sin theta) (sin delta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin theta)
(sin.f64 theta)
theta
(sin delta)
(sin.f64 delta)
delta
(cos phi1)
(cos.f64 phi1)
phi1
(+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))
(*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta)))))
(-.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (-.f64 #s(literal 0 binary64) (cos.f64 phi1))) (*.f64 (cos.f64 delta) (sin.f64 phi1)))
0
#s(literal 0 binary64)
(+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(* (cos delta) (sin phi1))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(cos delta)
(cos.f64 delta)
(sin phi1)
(sin.f64 phi1)
(* (sin delta) (* (cos phi1) (cos theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(* (cos phi1) (cos theta))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
lambda1
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta)))))
(* (* (sin theta) (sin delta)) (cos phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (sin theta) (sin delta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin theta)
(sin.f64 theta)
theta
(sin delta)
(sin.f64 delta)
delta
(cos phi1)
(cos.f64 phi1)
phi1
(- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 theta))))
(cos delta)
(cos.f64 delta)
(* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))
(*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))
(+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))
(+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(cos phi1)
(cos.f64 phi1)
phi1
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(* (- 1 (pow (sin phi1) 2)) (cos delta))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
1
#s(literal 1 binary64)
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin phi1)
(sin.f64 phi1)
2
#s(literal 2 binary64)
(cos delta)
(cos.f64 delta)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(* (cos phi1) (* (sin delta) (cos theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))))
(* (* (sin theta) (sin delta)) (cos phi1))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(* (sin theta) (sin delta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin theta)
(sin.f64 theta)
theta
(sin delta)
(sin.f64 delta)
delta
(cos phi1)
(cos.f64 phi1)
phi1
(+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))
(-.f64 (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1))))
(* (- 0 (sin phi1)) (* (cos theta) (cos phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(- 0 (sin phi1))
(-.f64 #s(literal 0 binary64) (sin.f64 phi1))
0
#s(literal 0 binary64)
(sin phi1)
(sin.f64 phi1)
(* (cos theta) (cos phi1))
(*.f64 (cos.f64 phi1) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
(+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))
(*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))
(*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))
(* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))
(*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* 2 phi1)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(cos (* 2 phi1))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* 2 phi1)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(cos delta)
(cos.f64 delta)

localize402.0ms (2.1%)

Memory
20.9MiB live, 493.4MiB allocated
Localize:

Found 16 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓accuracy99.6%
(*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (cos.f64 phi1)))
✓accuracy99.1%
(+.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))
✓accuracy75.3%
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) phi1))))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓accuracy99.6%
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
✓accuracy99.5%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
✓accuracy99.2%
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
✓accuracy99.8%
(*.f64 phi1 (cos.f64 delta))
✓accuracy99.8%
(*.f64 (sin.f64 delta) (cos.f64 theta))
✓accuracy99.8%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓accuracy99.7%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta)))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
✓accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓accuracy99.1%
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
Samples
101.0ms77×2valid
95.0ms134×0valid
50.0ms45×1valid
Compiler

Compiled 625 to 58 computations (90.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 196.0ms
ival-cos: 61.0ms (31.2% of total)
ival-mult: 54.0ms (27.6% of total)
ival-sin: 22.0ms (11.2% of total)
adjust: 16.0ms (8.2% of total)
ival-add: 15.0ms (7.7% of total)
ival-atan2: 12.0ms (6.1% of total)
ival-sub: 10.0ms (5.1% of total)
ival-pow2: 4.0ms (2% of total)
ival-neg: 2.0ms (1% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series90.0ms (0.5%)

Memory
-5.2MiB live, 74.4MiB allocated
Counts
25 → 756
Calls
Call 1
Inputs
#<alt (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))>
#<alt (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))))>
#<alt (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta)))>
#<alt (* (* (sin theta) (sin delta)) (cos phi1))>
#<alt (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))>
#<alt (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))>
#<alt (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))>
#<alt (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (cos phi1)>
#<alt (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))>
#<alt (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))>
#<alt (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))>
#<alt (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))))>
#<alt (* (sin theta) (sin delta))>
#<alt (* (sin delta) (* (cos phi1) (cos theta)))>
#<alt (* (sin delta) (cos theta))>
#<alt (* phi1 (cos delta))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))>
#<alt (pow (sin phi1) 2)>
#<alt (* (sin delta) (sin theta))>
#<alt (- 1/2 (* 1/2 (cos (* 2 phi1))))>
#<alt (* (- 0 (sin phi1)) (* (cos theta) (cos phi1)))>
Outputs
#<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)>
#<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 (+ (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 (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 (* 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 (- 1 (pow phi1 2))>
#<alt (- (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (pow phi1 2))>
#<alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))>
#<alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* phi1 (cos theta)))) (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (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 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))>
#<alt (* -1 (* (pow phi1 2) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))>
#<alt (* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))>
#<alt (* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))>
#<alt (* -1 (* (pow phi1 2) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))>
#<alt (- (cos delta) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (+ (cos delta) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (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 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* delta (- (* -1/2 (* delta (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* delta (- (* delta (+ (* -1/2 (- 1 (pow (sin phi1) 2))) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<alt (- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<alt (- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<alt (- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (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 phi1) (* (sin delta) (sin phi1))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<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 (* 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 (* 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 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 (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 (+ 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 (* 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 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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)))))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))))>
#<alt (+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (pow phi1 2) (cos delta)))>
#<alt (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))>
#<alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))>
#<alt (* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (- (* 1/2 (cos (* 2 phi1))) 1/2)>
#<alt (- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)>
#<alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)>
#<alt (- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))>
#<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 (* 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 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 (* (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 (* 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))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt phi1>
#<alt (+ phi1 (* -1/2 (* (pow delta 2) phi1)))>
#<alt (+ phi1 (* (pow delta 2) (+ (* -1/2 phi1) (* 1/24 (* (pow delta 2) phi1)))))>
#<alt (+ phi1 (* (pow delta 2) (+ (* -1/2 phi1) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) phi1)) (* 1/24 phi1))))))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<alt (* phi1 (cos delta))>
#<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 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<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 (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 (* 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 (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 (* -1 (* phi1 (cos theta)))>
#<alt (* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))>
#<alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))>
#<alt (* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (sin phi1)))>
#<alt (+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))>
#<alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))>
#<alt (+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
#<alt (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))>
Calls

189 calls:

TimeVariablePointExpression
17.0ms
delta
@-inf
(* (sin delta) (* (cos phi1) (cos theta)))
13.0ms
theta
@inf
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta)))
6.0ms
theta
@0
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
1.0ms
phi1
@inf
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
1.0ms
phi1
@-inf
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))

rewrite753.0ms (3.9%)

Memory
11.0MiB live, 733.7MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
5 138×*-lowering-*.f32
5 138×*-lowering-*.f64
4 214×accelerator-lowering-fma.f32
4 214×accelerator-lowering-fma.f64
2 802×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
055365
1331336
23008336
08659327
Stop Event
1×iter limit
1×node limit
Counts
25 → 646
Calls
Call 1
Inputs
(+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta))))
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (- 0 (+ (* (cos delta) (sin phi1)) (* (sin delta) (* (cos phi1) (cos theta))))) (sin phi1)) (cos delta)))
(* (* (sin theta) (sin delta)) (cos phi1))
(- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(cos phi1)
(+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta))
(+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))
(neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta)))
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ (* (* (- 0 (sin phi1)) (* (cos theta) (cos phi1))) (sin delta)) (+ (neg (* (- 1/2 (* 1/2 (cos (* 2 phi1)))) (cos delta))) (cos delta)))))
(* (sin theta) (sin delta))
(* (sin delta) (* (cos phi1) (cos theta)))
(* (sin delta) (cos theta))
(* phi1 (cos delta))
(- 1 (pow (sin phi1) 2))
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(pow (sin phi1) 2)
(* (sin delta) (sin theta))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(* (- 0 (sin phi1)) (* (cos theta) (cos phi1)))
Outputs
(+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))
(+.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))
(-.f64 (/.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))))
(fma.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))) (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))) (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #s(literal 3 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta)) (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (-.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))))))
(*.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))) (cos.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 2 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))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))))) 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) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.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 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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))) (+.f64 (cos.f64 delta) (neg.f64 (*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(+.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))
(-.f64 (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))) (/.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (/.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))) (*.f64 phi1 (*.f64 (cos.f64 delta) phi1)))
(fma.f64 phi1 (neg.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (cos.f64 delta))
(fma.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (-.f64 #s(literal 0 binary64) phi1) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (cos.f64 delta))
(fma.f64 (neg.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) phi1 (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (-.f64 #s(literal 0 binary64) phi1))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #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) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))
(/.f64 (-.f64 (*.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) lambda1))) (+.f64 (*.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) lambda1))))
(/.f64 (+.f64 (*.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))))
(/.f64 (neg.f64 (+.f64 (*.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) lambda1))) (+.f64 (*.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) #s(literal 2 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))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1)))))
(+.f64 (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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (+.f64 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 delta))
(+.f64 (+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (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 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (sin.f64 delta) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (+.f64 (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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal -1 binary64) (+.f64 (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) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (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 -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta) (+.f64 (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) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (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 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.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 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.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 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (neg.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (-.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 delta)))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (sin.f64 phi1)))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (sin.f64 phi1)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (sin.f64 phi1)) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (sin.f64 phi1)) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (sin.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #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) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (*.f64 (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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (*.f64 (sin.f64 phi1) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (sin.f64 phi1) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))) (*.f64 (sin.f64 phi1) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (sin.f64 phi1) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) #s(literal 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) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (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 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (sin.f64 theta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (sin.f64 delta))
(cos.f64 phi1)
(+.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))
(+.f64 (*.f64 (cos.f64 delta) #s(literal 1 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta)))
(-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(-.f64 (+.f64 (cos.f64 delta) #s(literal 0 binary64)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(fma.f64 (cos.f64 delta) #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta))
(fma.f64 #s(literal 1 binary64) (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (cos.f64 delta))
(fma.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal -1 binary64) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta))
(fma.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #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 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) 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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))))
(/.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (pow.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) #s(literal -1 binary64))
(*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 delta))
(*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(+.f64 (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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (+.f64 (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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 delta))
(+.f64 (+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (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 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (sin.f64 delta) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (+.f64 (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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal -1 binary64) (+.f64 (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) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (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 -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta) (+.f64 (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) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (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 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 delta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 delta)) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.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 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.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 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (neg.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (neg.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 delta)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (-.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (cos.f64 delta)))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (sin.f64 phi1)))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (sin.f64 phi1)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (sin.f64 phi1)) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (sin.f64 phi1)) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (sin.f64 phi1)) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (sin.f64 phi1)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) (sin.f64 phi1)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (sin.f64 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #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) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (*.f64 (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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (sin.f64 phi1) #s(literal 1 binary64))) (*.f64 (sin.f64 phi1) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))))) (*.f64 (sin.f64 phi1) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))))) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (sin.f64 phi1) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))) (*.f64 (sin.f64 phi1) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (sin.f64 phi1) (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (sin.f64 phi1) (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)))) (*.f64 (sin.f64 phi1) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 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) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.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) delta)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta)) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) #s(literal 3 binary64)) (pow.f64 (cos.f64 delta) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))))) #s(literal 2 binary64)) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (cos.f64 delta))) #s(literal 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) delta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) (*.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (*.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))))))
(*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(+.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(neg.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #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 0 binary64) (cos.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(*.f64 (cos.f64 delta) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) (cos.f64 delta)))
(*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 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))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(-.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 (*.f64 (cos.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (sin.f64 delta)) #s(literal 2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (cos.f64 theta))
(/.f64 #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 (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) phi1)
(*.f64 phi1 (cos.f64 delta))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 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 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (cos.f64 phi1)) #s(literal 2 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(fma.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 1 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))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (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 (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 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))))
(*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (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 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (cos.f64 phi1) (*.f64 (*.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 (sin.f64 delta) (cos.f64 theta)) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.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 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))
(+.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 0 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (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/2 binary64)) #s(literal 1/2 binary64))
(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 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 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/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)))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 0 binary64))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (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))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 0 binary64))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)))))))) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 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 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 0 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)))))))) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 (pow.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)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1) #s(literal 0 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (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)))))))
(/.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 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #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 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 0 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 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 -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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))))))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(*.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 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.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 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)))))))) #s(literal 1 binary64)))
(*.f64 (pow.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)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1))
(-.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 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 0 binary64))
(+.f64 #s(literal 1/2 binary64) (*.f64 (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/2 binary64)) #s(literal 1/2 binary64))
(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 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 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/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)))))))
(fma.f64 (sin.f64 phi1) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 0 binary64))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (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))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 0 binary64))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)))))))) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 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 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 0 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi1) #s(literal 0 binary64))
(fma.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)))))))) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 (pow.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)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) #s(literal 0 binary64))
(fma.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1) #s(literal 0 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 (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)))))))
(/.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 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #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 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) #s(literal 0 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 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 -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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))))))) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64)))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 1 binary64))
(*.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 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 #s(literal 1 binary64) (+.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 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (pow.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)))))))) #s(literal 1 binary64)))
(*.f64 (pow.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)))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 #s(literal 0 binary64) (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(neg.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (sin.f64 phi1)))
(/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) (*.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) (*.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (*.f64 #s(literal 2 binary64) (sin.f64 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (sin.f64 phi1))
(/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 3 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(/.f64 (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 phi1))
(/.f64 (*.f64 (+.f64 (cos.f64 (-.f64 theta phi1)) (cos.f64 (+.f64 phi1 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (cos.f64 (+.f64 phi1 theta)) (cos.f64 (-.f64 phi1 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) #s(literal 2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(*.f64 (cos.f64 theta) (*.f64 (cos.f64 phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 theta) (-.f64 #s(literal 0 binary64) (sin.f64 phi1))) (cos.f64 phi1))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 phi1)) (cos.f64 theta))

simplify691.0ms (3.5%)

Memory
6.5MiB live, 914.8MiB allocated
Algorithm
1×egg-herbie
Rules
10 216×accelerator-lowering-fma.f32
10 216×accelerator-lowering-fma.f64
5 874×+-lowering-+.f64
5 874×+-lowering-+.f32
4 802×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
069115162
1235614449
2531614404
0835013836
Stop Event
1×iter limit
1×node limit
Counts
756 → 756
Calls
Call 1
Inputs
(+ 1 (* -1 (pow (sin phi1) 2)))
(+ 1 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* -1 (pow (sin phi1) 2))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(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))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(- 1 (pow phi1 2))
(- (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (pow phi1 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* phi1 (cos theta)))) (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(- (cos delta) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (+ (cos delta) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1/2 (* delta (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (+ (* -1/2 (- 1 (pow (sin phi1) 2))) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (sin delta) (sin phi1))))
(- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (sin delta) (sin phi1))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (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 phi1) (* (sin delta) (sin phi1))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
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)
(cos delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- 1/24 (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (+ 1/24 (* -1 (* (pow delta 2) (+ 1/720 (* -1/720 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 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)))))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(* 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))
(* delta (* (cos phi1) (cos theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* (cos phi1) (cos theta))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (cos theta)))) (* 1/120 (* (cos phi1) (cos theta)))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos theta) (sin delta))
(+ (* -1/2 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta)))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* 1/24 (* (cos theta) (sin delta))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (sin delta))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/24 (* (cos phi1) (sin delta))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(* 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))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
phi1
(+ phi1 (* -1/2 (* (pow delta 2) phi1)))
(+ phi1 (* (pow delta 2) (+ (* -1/2 phi1) (* 1/24 (* (pow delta 2) phi1)))))
(+ phi1 (* (pow delta 2) (+ (* -1/2 phi1) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) phi1)) (* 1/24 phi1))))))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
(* phi1 (cos delta))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(* 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))))
(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)
(* 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))
(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))))
(* -1 (* phi1 (cos theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (sin phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
Outputs
(+ 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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/2 (pow (sin phi1) 2)) 1/2))))))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal -1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ 1 (+ (* -1 (pow (sin phi1) 2)) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (+ (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (pow (sin phi1) 2))) 1/2))))))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (+.f64 (*.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (+.f64 (*.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1/6 binary64)) #s(literal -1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))))))
(+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))
(+.f64 (cos.f64 delta) (-.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64))) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (sin.f64 phi1))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 theta theta)) #s(literal 1/2 binary64)))))
(+ (cos delta) (+ (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1)))))))))))
(+.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal -1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 theta theta))))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
(+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 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)))
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 lambda1 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 lambda1 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ (cos delta) (* -1 (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.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 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal -1/6 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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(- 1 (pow phi1 2))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(- (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (pow phi1 2))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (*.f64 delta (*.f64 phi1 (cos.f64 theta))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 phi1 (cos.f64 theta)))) (*.f64 phi1 phi1)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* phi1 (cos theta)))) (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(+.f64 (*.f64 delta (-.f64 (*.f64 delta (+.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 delta (*.f64 phi1 (cos.f64 theta)))) (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (*.f64 phi1 (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta)))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1) (cos.f64 delta)))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1) (cos.f64 delta)))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1) (cos.f64 delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))) phi1) (cos.f64 delta)))
(- (cos delta) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))
(- (+ (cos delta) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(+.f64 (*.f64 (*.f64 phi1 #s(literal 1/2 binary64)) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 phi1 #s(literal -1/24 binary64)) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (sin.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(+.f64 (cos.f64 delta) (-.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (*.f64 phi1 (*.f64 theta theta)) (sin.f64 delta))) (*.f64 #s(literal -1/24 binary64) (*.f64 phi1 (sin.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (sin.f64 delta))))) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta)) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta))))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(+ (cos delta) (* phi1 (- (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(- (+ 1 (* delta (- (* -1/2 (* delta (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (+ (* -1/2 (- 1 (pow (sin phi1) 2))) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 (*.f64 delta (-.f64 (*.f64 delta (+.f64 (*.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (sin delta) (sin phi1))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 theta theta)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (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 phi1) (* (sin delta) (sin phi1))))
(+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal -1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 theta theta))))))) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(* (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal -1/6 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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* theta (* (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 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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)
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* (pow phi1 2) (cos delta))))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (cos.f64 delta))
(+ (cos delta) (* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta))))
(+.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64))))))
(+ (cos delta) (* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta))))
(+.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64))))) (cos.f64 delta))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (+ (* -1 (* (pow delta 2) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* 1/2 (cos (* 2 phi1)))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 delta delta) (+.f64 #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 phi1 #s(literal 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))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 delta delta) (-.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 #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 phi1 #s(literal 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))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 delta delta) (-.f64 (-.f64 #s(literal 1/48 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/720 binary64) (*.f64 #s(literal -1/720 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))) (+.f64 #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 phi1 #s(literal 2 binary64)))))))))))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(- (cos delta) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (+ (* -1 (* phi1 (cos delta))) (* -1 (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 phi1 (cos.f64 delta)))))
(+ (cos delta) (* phi1 (+ (* -1 (* (cos theta) (sin delta))) (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))))))
(+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) (cos.f64 delta))) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64))) (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 theta theta)) #s(literal 1/2 binary64)))) (-.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta))))
(- (+ (cos delta) (+ (* -1 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (* (sin delta) (sin phi1)))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (* (sin delta) (sin phi1)))) (* 1/720 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))))))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal -1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 theta theta))))))) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (+ (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/2 (cos (* 2 phi1)))))
(+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1 (* delta (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) (* -1 (* (cos phi1) (* (cos theta) (sin phi1))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 delta (-.f64 (*.f64 delta (+.f64 #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 phi1 #s(literal 2 binary64)))))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))))
(+ 1/2 (+ (* 1/2 (cos (* 2 phi1))) (* delta (+ (* -1 (* (cos phi1) (* (cos theta) (sin phi1)))) (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1))))))))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 delta (-.f64 (*.f64 delta (+.f64 (+.f64 (*.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta))) #s(literal 1/6 binary64)) #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 phi1 #s(literal 2 binary64)))))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* (pow phi1 2) (- (* 1/3 (* (pow phi1 2) (cos delta))) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64)))))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* -2/45 (* (pow phi1 2) (cos delta))) (* -1/3 (cos delta)))) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64))))) (cos.f64 delta)))
(* (pow phi1 2) (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/315 (* (pow phi1 2) (cos delta))) (* 2/45 (cos delta)))) (* -1/3 (cos delta)))) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 delta) (+.f64 (*.f64 #s(literal 1/315 binary64) (*.f64 phi1 phi1)) #s(literal -2/45 binary64)))) (*.f64 (cos.f64 delta) #s(literal 1/3 binary64)))) (cos.f64 delta)))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(- (* 1/2 (cos (* 2 phi1))) 1/2)
(+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* 1/2 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) 1/2)
(+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* -1/24 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 delta delta) (*.f64 (+.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/24 binary64) (*.f64 delta delta)) #s(literal 1/2 binary64)))) #s(literal -1/2 binary64)))
(- (+ (* 1/2 (cos (* 2 phi1))) (* (pow delta 2) (- (* (pow delta 2) (- (* 1/720 (* (pow delta 2) (- 1/2 (* 1/2 (cos (* 2 phi1)))))) (* 1/24 (- 1/2 (* 1/2 (cos (* 2 phi1))))))) (* -1/2 (- 1/2 (* 1/2 (cos (* 2 phi1)))))))) 1/2)
(+.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 delta delta) (*.f64 (+.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/720 binary64) (*.f64 delta delta)) #s(literal -1/24 binary64)))) (+.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(* -1 (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1)))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))) lambda1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (+ (cos delta) (* -1 (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) (* (cos delta) (- 1/2 (* 1/2 (cos (* 2 phi1))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))))
(* theta (sin delta))
(*.f64 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/6 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)) #s(literal 1/120 binary64))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (* (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 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (cos.f64 theta))))
(* delta (+ (* (cos phi1) (cos theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (cos theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (cos theta))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (+.f64 (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)) #s(literal -1/6 binary64))))))
(* 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 (+.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (cos.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (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 (*.f64 (cos.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))
(+ (* (cos theta) (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* (cos theta) (sin delta))) (* 1/24 (* (pow phi1 2) (* (cos theta) (sin delta)))))))
(+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (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))))))))
(+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (cos.f64 theta) #s(literal -1/2 binary64)) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta)))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/2 (* (cos phi1) (sin delta))) (* 1/24 (* (pow theta 2) (* (cos phi1) (sin delta)))))))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 theta theta))))))
(+ (* (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))))))))
(+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 theta theta)) #s(literal 1/24 binary64)))))))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))
(* delta (cos theta))
(*.f64 delta (cos.f64 theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (cos.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* 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 (+.f64 (cos.f64 theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (cos.f64 theta) #s(literal -1/6 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (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 (+.f64 (*.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 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/2 binary64) (*.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)))))))
(+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 theta theta)) #s(literal 1/24 binary64)))))))
(* (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))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
phi1
(+ phi1 (* -1/2 (* (pow delta 2) phi1)))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) phi1)
(+ phi1 (* (pow delta 2) (+ (* -1/2 phi1) (* 1/24 (* (pow delta 2) phi1)))))
(+.f64 phi1 (*.f64 (*.f64 delta delta) (*.f64 phi1 (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 delta delta))))))
(+ phi1 (* (pow delta 2) (+ (* -1/2 phi1) (* (pow delta 2) (+ (* -1/720 (* (pow delta 2) phi1)) (* 1/24 phi1))))))
(+.f64 phi1 (*.f64 (*.f64 delta delta) (+.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (*.f64 (*.f64 delta delta) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 delta delta)) #s(literal 1/24 binary64)))))))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64)))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64)))))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(* 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 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 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)))))))))))
(*.f64 phi1 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 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))) (* (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 (+.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (cos.f64 theta) (sin.f64 delta)) #s(literal 2/15 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -4/315 binary64))))))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* delta (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (*.f64 delta (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 delta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta)))))
(* 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 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (cos.f64 theta))) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta)))
(+ (* -1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(+ (* (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 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal -1/2 binary64) (*.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)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.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 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 2/45 binary64))))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/315 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))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 #s(literal -1/6 binary64) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #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 theta (sin.f64 delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (sin.f64 delta)))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/6 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)) #s(literal 1/120 binary64))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 2/45 binary64))))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/315 binary64))))))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(- 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(* -1 (* phi1 (cos theta)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* -1 (* (pow phi1 2) (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))))))
(*.f64 phi1 (-.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64))) (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))) (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta))))))))
(*.f64 phi1 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -2/15 binary64))) (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)))) (cos.f64 theta)))
(* phi1 (+ (* -1 (cos theta)) (* (pow phi1 2) (+ (* -1 (+ (* -1/2 (cos theta)) (* -1/6 (cos theta)))) (* (pow phi1 2) (+ (* -1 (* (pow phi1 2) (+ (* -1/144 (cos theta)) (+ (* -1/240 (cos theta)) (+ (* -1/720 (cos theta)) (* -1/5040 (cos theta))))))) (* -1 (+ (* 1/120 (cos theta)) (+ (* 1/24 (cos theta)) (* 1/12 (cos theta)))))))))))
(*.f64 phi1 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (cos.f64 theta) #s(literal 2/3 binary64)) (*.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 (cos.f64 theta) #s(literal -2/15 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 theta) #s(literal -4/315 binary64))))))) (cos.f64 theta)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (sin phi1)))
(*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* 1/2 (* (pow theta 2) (* (cos phi1) (sin phi1)))))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (pow theta 2) (* (cos phi1) (sin phi1)))) (* 1/2 (* (cos phi1) (sin phi1))))))
(-.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 theta theta)) #s(literal 1/2 binary64)))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(+ (* -1 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* 1/2 (* (cos phi1) (sin phi1))) (* (pow theta 2) (+ (* -1/24 (* (cos phi1) (sin phi1))) (* 1/720 (* (pow theta 2) (* (cos phi1) (sin phi1)))))))))
(-.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (sin.f64 phi1)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 phi1)) (+.f64 #s(literal -1/24 binary64) (*.f64 #s(literal 1/720 binary64) (*.f64 theta theta))))))) (*.f64 (sin.f64 phi1) (cos.f64 phi1)))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))
(* -1 (* (cos phi1) (* (cos theta) (sin phi1))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (cos.f64 theta))))

eval314.0ms (1.6%)

Memory
59.7MiB live, 572.7MiB allocated
Compiler

Compiled 77 256 to 4 017 computations (94.8% saved)

prune417.0ms (2.1%)

Memory
-68.8MiB live, 418.0MiB allocated
Pruning

37 alts after pruning (36 fresh and 1 done)

PrunedKeptTotal
New1 655281 683
Fresh15823
Picked415
Done000
Total1 674371 711
Accuracy
100.0%
Counts
1 711 → 37
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.9%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
▶30.8%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
▶14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
18.6%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (cos.f64 phi1) #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
31.0%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
17.4%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
25.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
23.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
20.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
17.8%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
12.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
20.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
48.5%
(/.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))) #s(literal 2 binary64)))))
99.4%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
99.7%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
▶99.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
▶70.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
91.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
94.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
91.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)))))
83.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))))
99.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (sin.f64 (-.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (acos.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta)))))))))))
72.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
▶64.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
82.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64))) (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)))))
79.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
99.6%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
79.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta)))))
87.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))))
48.5%
(*.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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) 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 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) phi1))))))))
99.3%
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 phi1) (sin.f64 delta)))))) lambda1)))
✓70.3%
lambda1
Compiler

Compiled 2 764 to 1 707 computations (38.2% saved)

simplify361.0ms (1.8%)

Memory
-2.9MiB live, 460.7MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (cos.f64 phi1) (sin.f64 delta))
✓cost-diff0
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
✓cost-diff6528
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
✓cost-diff0
(*.f64 theta (cos.f64 phi1))
✓cost-diff0
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓cost-diff6592
(-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
✓cost-diff0
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
✓cost-diff0
(atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))
✓cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
✓cost-diff6272
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))
✓cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
✓cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
✓cost-diff0
(cos.f64 phi1)
✓cost-diff0
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
✓cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓cost-diff0
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
Rules
8 524×accelerator-lowering-fma.f32
8 524×accelerator-lowering-fma.f64
3 120×*-lowering-*.f32
3 120×*-lowering-*.f64
2 380×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058637
1141632
2327632
3757620
41487620
52254620
63238620
73945620
85198620
95984620
106273620
116440620
127718620
08074604
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(cos phi1)
phi1
(* (sin delta) (sin theta))
(sin delta)
delta
(sin theta)
theta
(- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(cos delta)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
1/2
(* 1/2 (cos (* phi1 2)))
(cos (* phi1 2))
(* phi1 2)
2
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(sin phi1)
(* (cos phi1) (* (sin delta) (cos theta)))
(* (sin delta) (cos theta))
(cos theta)
lambda1
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1)))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(sin theta)
theta
(sin delta)
delta
(cos phi1)
phi1
(- 1 (* phi1 phi1))
1
(* phi1 phi1)
(+ lambda1 (atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))
lambda1
(atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))
(* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta)))
(+ 1 (* -1/2 (* phi1 phi1)))
1
(* -1/2 (* phi1 phi1))
-1/2
(* phi1 phi1)
phi1
(* (sin delta) (sin theta))
(sin delta)
delta
(sin theta)
theta
(- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))
(cos delta)
(* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))
(+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))
(* (sin delta) (cos theta))
(cos theta)
(* phi1 (cos delta))
(atan2 (* (* theta (cos phi1)) (sin delta)) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (* theta (cos phi1)) (sin delta))
(* theta (cos phi1))
theta
(cos phi1)
phi1
(sin delta)
delta
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(* (- 1 (pow (sin phi1) 2)) (cos delta))
(- 1 (pow (sin phi1) 2))
1
(pow (sin phi1) 2)
(sin phi1)
2
(cos delta)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(* (cos phi1) (* (sin delta) (cos theta)))
(* (sin delta) (cos theta))
(cos theta)
(atan2 (* (* (cos phi1) (sin delta)) (sin theta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* (* (cos phi1) (sin delta)) (sin theta))
(* (cos phi1) (sin delta))
(cos phi1)
phi1
(sin delta)
delta
(sin theta)
theta
(- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta))))))
(cos delta)
(* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))
(sin phi1)
(+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta))))
(* (sin phi1) (cos delta))
(* (cos phi1) (* (cos theta) (sin delta)))
(* (cos theta) (sin delta))
(cos theta)
Outputs
(+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(cos phi1)
(cos.f64 phi1)
phi1
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(cos delta)
(cos.f64 delta)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* phi1 2)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))
(cos (* phi1 2))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* phi1 2)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(sin phi1)
(sin.f64 phi1)
(* (cos phi1) (* (sin delta) (cos theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
lambda1
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(* (* (sin theta) (sin delta)) (cos phi1))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (sin theta) (sin delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin theta)
(sin.f64 theta)
theta
(sin delta)
(sin.f64 delta)
delta
(cos phi1)
(cos.f64 phi1)
phi1
(- 1 (* phi1 phi1))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
1
#s(literal 1 binary64)
(* phi1 phi1)
(*.f64 phi1 phi1)
(+ lambda1 (atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))))))
lambda1
(atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))))
(+ 1 (* -1/2 (* phi1 phi1)))
(+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))
1
#s(literal 1 binary64)
(* -1/2 (* phi1 phi1))
(*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))
-1/2
#s(literal -1/2 binary64)
(* phi1 phi1)
(*.f64 phi1 phi1)
phi1
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (*.f64 phi1 (*.f64 (sin.f64 delta) (cos.f64 theta))))
(cos delta)
(cos.f64 delta)
(* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))
(*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))
(+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))
(+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
(* phi1 (cos delta))
(*.f64 phi1 (cos.f64 delta))
(atan2 (* (* theta (cos phi1)) (sin delta)) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta)) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(* (* theta (cos phi1)) (sin delta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
theta
(cos phi1)
(cos.f64 phi1)
phi1
(sin delta)
(sin.f64 delta)
delta
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (- 1 (pow (sin phi1) 2)) (cos delta))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
1
#s(literal 1 binary64)
(pow (sin phi1) 2)
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(sin phi1)
(sin.f64 phi1)
2
#s(literal 2 binary64)
(cos delta)
(cos.f64 delta)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos phi1) (* (sin delta) (cos theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
(atan2 (* (* (cos phi1) (sin delta)) (sin theta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(* (* (cos phi1) (sin delta)) (sin theta))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(cos phi1)
(cos.f64 phi1)
phi1
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta))))))
(*.f64 (cos.f64 phi1) (-.f64 (*.f64 (cos.f64 phi1) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(cos delta)
(cos.f64 delta)
(* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(sin phi1)
(sin.f64 phi1)
(+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta))))
(+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (sin phi1) (cos delta))
(*.f64 (cos.f64 delta) (sin.f64 phi1))
(* (cos phi1) (* (cos theta) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (cos theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)

localize308.0ms (1.6%)

Memory
-8.7MiB live, 420.9MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
✓accuracy99.6%
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
✓accuracy99.5%
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))
✓accuracy99.2%
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta))))))
✓accuracy99.7%
(*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta))
✓accuracy99.6%
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
✓accuracy99.5%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
✓accuracy99.2%
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
✓accuracy99.8%
(*.f64 (sin.f64 delta) (cos.f64 theta))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓accuracy87.4%
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
✓accuracy86.3%
(atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))
✓accuracy100.0%
(sin.f64 theta)
✓accuracy100.0%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
✓accuracy99.8%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓accuracy99.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓accuracy99.5%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
✓accuracy99.4%
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
Samples
184.0ms256×0valid
Compiler

Compiled 638 to 61 computations (90.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 150.0ms
ival-atan2: 48.0ms (32.1% of total)
ival-mult: 45.0ms (30.1% of total)
ival-cos: 21.0ms (14% of total)
ival-sin: 16.0ms (10.7% of total)
ival-add: 11.0ms (7.4% of total)
ival-sub: 6.0ms (4% of total)
ival-pow2: 2.0ms (1.3% of total)
exact: 1.0ms (0.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series58.0ms (0.3%)

Memory
35.8MiB live, 73.3MiB allocated
Counts
28 → 864
Calls
Call 1
Inputs
#<alt (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (cos phi1)>
#<alt (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1))))>
#<alt (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1)))>
#<alt (* (* (sin theta) (sin delta)) (cos phi1))>
#<alt (* (sin theta) (sin delta))>
#<alt (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))>
#<alt (+ lambda1 (atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))>
#<alt (atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))>
#<alt (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta)))>
#<alt (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))>
#<alt (atan2 (* (* theta (cos phi1)) (sin delta)) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))>
#<alt (* (* theta (cos phi1)) (sin delta))>
#<alt (* theta (cos phi1))>
#<alt (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (* (cos phi1) (sin delta)) (sin theta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))))>
#<alt (* (* (cos phi1) (sin delta)) (sin theta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (+ 1/2 (* 1/2 (cos (* phi1 2))))>
#<alt (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))>
#<alt (* (sin delta) (sin theta))>
#<alt (sin theta)>
#<alt (* (sin delta) (cos theta))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (pow (sin phi1) 2)>
#<alt (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))>
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 (* 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 (+ 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 (* 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 (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 (* (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 (* 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 (* 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 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 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow 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 (- 1 (pow phi1 2))>
#<alt (- (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (pow phi1 2))>
#<alt (- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))>
#<alt (- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* phi1 (cos theta)))) (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (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 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))>
#<alt (* -1 (* (pow phi1 2) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))>
#<alt (* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))>
#<alt (* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))>
#<alt (* -1 (* (pow phi1 2) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))>
#<alt (* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))>
#<alt (- (cos delta) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (+ (cos delta) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))>
#<alt (* (sin delta) (sin theta))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))>
#<alt (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))>
#<alt (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))>
#<alt (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))>
#<alt (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))>
#<alt (* delta (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))>
#<alt (* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))))))>
#<alt (* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))))))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* theta (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))>
#<alt (* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))))))>
#<alt (* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))))))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<alt (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))>
#<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 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* delta (- (* -1/2 (* delta (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (+ 1 (* delta (- (* delta (+ (* -1/2 (- 1 (pow (sin phi1) 2))) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<alt (- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<alt (- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))>
#<alt (- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (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 phi1) (* (sin delta) (sin phi1))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (sin delta))>
#<alt (+ (* -1/2 (* (pow phi1 2) (* theta (sin delta)))) (* theta (sin delta)))>
#<alt (+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* 1/24 (* (pow phi1 2) (* theta (sin delta)))))))>
#<alt (+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* theta (sin delta)))) (* 1/24 (* theta (sin delta))))))))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* delta (* theta (cos phi1)))>
#<alt (* delta (+ (* -1/6 (* (pow delta 2) (* theta (cos phi1)))) (* theta (cos phi1))))>
#<alt (* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* 1/120 (* (pow delta 2) (* theta (cos phi1))))))))>
#<alt (* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* theta (cos phi1)))) (* 1/120 (* theta (cos phi1)))))))))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (* (cos phi1) (sin delta)))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt theta>
#<alt (+ theta (* -1/2 (* (pow phi1 2) theta)))>
#<alt (+ theta (* (pow phi1 2) (+ (* -1/2 theta) (* 1/24 (* (pow phi1 2) theta)))))>
#<alt (+ theta (* (pow phi1 2) (+ (* -1/2 theta) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) theta)) (* 1/24 theta))))))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<alt (* theta (cos phi1))>
#<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 (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 (* (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 (* 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 (* 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 (sin delta)>
#<alt (+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))>
#<alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))>
#<alt (+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* delta (cos phi1))>
#<alt (* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))>
#<alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))>
#<alt (* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<alt (* (cos phi1) (sin delta))>
#<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 (* 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 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 (* 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))>
#<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 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (pow (sin phi1) 2))>
#<alt (- 1 (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 (* 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)))))>
Calls

216 calls:

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

rewrite590.0ms (3%)

Memory
-18.7MiB live, 814.6MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
5 278×accelerator-lowering-fma.f32
5 278×accelerator-lowering-fma.f64
4 996×*-lowering-*.f32
4 996×*-lowering-*.f64
3 658×/-lowering-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058390
1319388
22674370
09986361
Stop Event
1×iter limit
1×node limit
Counts
28 → 564
Calls
Call 1
Inputs
(+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(cos phi1)
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1))))
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (- 1 (* phi1 phi1)))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))
(+ lambda1 (atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta)))))))
(atan2 (* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta))) (- (cos delta) (* phi1 (+ (* (sin delta) (cos theta)) (* phi1 (cos delta))))))
(* (+ 1 (* -1/2 (* phi1 phi1))) (* (sin delta) (sin theta)))
(- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(atan2 (* (* theta (cos phi1)) (sin delta)) (- (* (- 1 (pow (sin phi1) 2)) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (* theta (cos phi1)) (sin delta))
(* theta (cos phi1))
(- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta))))))
(atan2 (* (* (cos phi1) (sin delta)) (sin theta)) (- (cos delta) (* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* (* (cos phi1) (sin delta)) (sin theta))
(* (cos phi1) (sin delta))
(+ 1/2 (* 1/2 (cos (* phi1 2))))
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(* (sin delta) (sin theta))
(sin theta)
(* (sin delta) (cos theta))
(- 1 (pow (sin phi1) 2))
(pow (sin phi1) 2)
(* (sin phi1) (+ (* (sin phi1) (cos delta)) (* (cos phi1) (* (cos theta) (sin delta)))))
Outputs
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))
(/.f64 (neg.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))))
(/.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) (+.f64 (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #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))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(cos.f64 phi1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 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 (/.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1)))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 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 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #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))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)))) (*.f64 (-.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) 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))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 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))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 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 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))
(-.f64 (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))) (/.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (/.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) phi1))) (*.f64 phi1 (*.f64 phi1 (cos.f64 delta))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)))) (/.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)))))
(fma.f64 phi1 (neg.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (cos.f64 delta))
(fma.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1) (cos.f64 delta))
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (cos.f64 delta))
(fma.f64 (neg.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) phi1 (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64))) (-.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (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 #s(literal 2 binary64) delta)))) (-.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)) (*.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 delta) (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))))
(/.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64))) (pow.f64 (cos.f64 delta) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta)))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) (-.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))))
(atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))
(fma.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(fma.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1)))))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1)))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64))))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1)))))) (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal -1/8 binary64)))) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (-.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) #s(literal 1 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 (*.f64 phi1 (*.f64 phi1 phi1))))) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64)) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (*.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))) (*.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (sin.f64 theta)))))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))))
(*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))))
(*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (sin.f64 theta))
(*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64)))) (sin.f64 theta)) (sin.f64 delta))
(+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (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 phi1 #s(literal 2 binary64))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.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 phi1 #s(literal 2 binary64))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(fma.f64 (cos.f64 delta) #s(literal 1/2 binary64) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (cos.f64 delta) #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 delta) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 delta) (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (sin.f64 phi1) (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.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 phi1 #s(literal 2 binary64))))) (/.f64 (cos.f64 delta) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (neg.f64 (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (neg.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1))) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (cos.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (cos.f64 delta) (sin.f64 phi1)) (/.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)))))))) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (/.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)))))))) (sin.f64 phi1)) (/.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (/.f64 (cos.f64 delta) #s(literal 1 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (/.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (/.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)))))))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (/.f64 (cos.f64 delta) (*.f64 #s(literal 1 binary64) (sin.f64 phi1))) (/.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)))))))) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 #s(literal 1 binary64) (sin.f64 phi1))) (/.f64 (cos.f64 delta) (sin.f64 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (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 phi1 #s(literal 2 binary64))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (*.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) #s(literal 3 binary64))) #s(literal 2 binary64)) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (-.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (pow.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 3 binary64)))) (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (+.f64 (neg.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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (+.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (*.f64 (*.f64 (cos.f64 delta) #s(literal 1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (/.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 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 theta (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(*.f64 (cos.f64 phi1) (*.f64 theta (sin.f64 delta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) theta))
(*.f64 theta (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) theta)
(*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1))
(*.f64 (*.f64 theta (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) theta)
(*.f64 theta (cos.f64 phi1))
(+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 delta))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(-.f64 (/.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(-.f64 (-.f64 (cos.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (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) delta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(fma.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.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)) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (cos.f64 delta))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (cos.f64 delta))
(fma.f64 (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 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) delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (-.f64 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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) (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (*.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.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 (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (neg.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (cos.f64 delta)))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 delta) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (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) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (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 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(/.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 phi1 delta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta phi1)) (sin.f64 (+.f64 phi1 delta)))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(*.f64 (sin.f64 delta) (cos.f64 phi1))
(+.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 #s(literal 1 binary64) (-.f64 #s(literal 0 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 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 1/4 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/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 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 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))))))) (-.f64 (*.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) (-.f64 (*.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))
(fma.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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/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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.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))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 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))))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/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 (*.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))) (cos.f64 (-.f64 phi1 phi1))) #s(literal 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 phi1 #s(literal 2 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.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))))))) #s(literal 1/4 binary64))) (neg.f64 (-.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 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 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 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 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta))))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (*.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 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 delta theta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 delta theta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 delta theta)))) #s(literal -1 binary64))
(*.f64 (sin.f64 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))
(sin.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 (neg.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 (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 #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 #s(literal 1 binary64) (-.f64 #s(literal 0 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 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(-.f64 (/.f64 #s(literal 1/4 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/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 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 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))))))) (-.f64 (*.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) (-.f64 (*.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))
(fma.f64 (sin.f64 phi1) (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) #s(literal 1 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 phi1)) (sin.f64 phi1) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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/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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.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))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 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))))))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (neg.f64 (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/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 (*.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))) (cos.f64 (-.f64 phi1 phi1))) #s(literal 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 phi1 #s(literal 2 binary64)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.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))))))) #s(literal 1/4 binary64))) (neg.f64 (-.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 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) #s(literal 1 binary64)) (+.f64 (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64)))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 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 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 binary64) (pow.f64 (sin.f64 phi1) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(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 #s(literal 2 binary64)))))
(-.f64 (/.f64 #s(literal 1/4 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/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 (cos.f64 (-.f64 phi1 phi1)) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))
(-.f64 (/.f64 #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 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)) (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 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 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 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)))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 phi1 phi1)) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))))
(pow.f64 (sin.f64 phi1) #s(literal 2 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (sin.f64 phi1))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) (sin.f64 phi1))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (sin.f64 phi1)) #s(literal 1 binary64)) (sin.f64 phi1))
(+.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (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 phi1 #s(literal 2 binary64))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(fma.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (cos.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(fma.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (cos.f64 phi1) (cos.f64 theta)) (*.f64 (sin.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (sin.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 theta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(fma.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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))) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.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 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta)))))))) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #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 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.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 (cos.f64 delta) (sin.f64 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (sin.f64 phi1)) (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) (sin.f64 phi1)))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) #s(literal 4 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (sin.f64 (-.f64 phi1 delta)) (sin.f64 (+.f64 phi1 delta))) (sin.f64 phi1)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #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)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (*.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.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 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 (neg.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 3 binary64))) (sin.f64 phi1))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.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 (cos.f64 delta) (sin.f64 phi1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta))))) (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (sin.f64 phi1))) (neg.f64 (-.f64 (*.f64 (cos.f64 delta) (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 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.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) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) theta))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(*.f64 (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) (sin.f64 phi1))

simplify636.0ms (3.3%)

Memory
-1.0MiB live, 1 201.5MiB allocated
Algorithm
1×egg-herbie
Rules
9 446×accelerator-lowering-fma.f32
9 446×accelerator-lowering-fma.f64
5 910×+-lowering-+.f64
5 910×+-lowering-+.f32
4 976×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
063816157
1219515565
2485815522
3683815522
0801914874
Stop Event
1×iter limit
1×node limit
Counts
864 → 864
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 (* 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)))))))
(+ 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 (* 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))))))
(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))))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
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)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow 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))
(- 1 (pow phi1 2))
(- (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (pow phi1 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* phi1 (cos theta)))) (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(cos delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(* -1 (* (pow phi1 2) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(- (cos delta) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (+ (cos delta) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(* delta (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* theta (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))
(* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(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 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1/2 (* delta (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (+ (* -1/2 (- 1 (pow (sin phi1) 2))) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (sin delta) (sin phi1))))
(- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (sin delta) (sin phi1))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (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 phi1) (* (sin delta) (sin phi1))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (sin delta))
(+ (* -1/2 (* (pow phi1 2) (* theta (sin delta)))) (* theta (sin delta)))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* 1/24 (* (pow phi1 2) (* theta (sin delta)))))))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* theta (sin delta)))) (* 1/24 (* theta (sin delta))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* delta (* theta (cos phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* theta (cos phi1)))) (* theta (cos phi1))))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* 1/120 (* (pow delta 2) (* theta (cos phi1))))))))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* theta (cos phi1)))) (* 1/120 (* theta (cos phi1)))))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
theta
(+ theta (* -1/2 (* (pow phi1 2) theta)))
(+ theta (* (pow phi1 2) (+ (* -1/2 theta) (* 1/24 (* (pow phi1 2) theta)))))
(+ theta (* (pow phi1 2) (+ (* -1/2 theta) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) theta)) (* 1/24 theta))))))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(* theta (cos phi1))
(- 1 (pow (sin phi1) 2))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(- (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))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos 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)))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(sin delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* delta (cos phi1))
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
(* (cos phi1) (sin delta))
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))))
(* 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))
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)
(* 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))
1
(+ 1 (* -1 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(- 1 (pow (sin phi1) 2))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(pow (sin phi1) 2)
(* 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)))))
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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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)))
(*.f64 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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)))
(*.f64 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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)))
(*.f64 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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 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)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(+ (* (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 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
1
#s(literal 1 binary64)
(+ 1 (* -1/2 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow 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 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow 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 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow 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 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #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 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(+ (* (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 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/6 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.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 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (sin.f64 theta) #s(literal -1/6 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #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))
(- 1 (pow phi1 2))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(- (+ 1 (* -1 (* delta (* phi1 (cos theta))))) (pow phi1 2))
(-.f64 #s(literal 1 binary64) (+.f64 (*.f64 delta (*.f64 phi1 (cos.f64 theta))) (*.f64 phi1 phi1)))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 phi1 (cos.f64 theta)))) (*.f64 phi1 phi1)))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* phi1 (cos theta)))) (+ 1/2 (* -1/2 (pow phi1 2))))) (* phi1 (cos theta))))) (pow phi1 2))
(+.f64 (*.f64 delta (-.f64 (*.f64 delta (+.f64 (*.f64 (*.f64 delta (*.f64 phi1 (cos.f64 theta))) #s(literal 1/6 binary64)) (-.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (*.f64 phi1 (cos.f64 theta)))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 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 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta)))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1) (cos.f64 delta)))
(* (pow phi1 2) (- (/ (cos delta) (pow phi1 2)) (+ (cos delta) (/ (* (cos theta) (sin delta)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1) (cos.f64 delta)))
(* -1 (* (pow phi1 2) (cos delta)))
(*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* (pow phi1 2) (- (* -1 (/ (* (cos theta) (sin delta)) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (-.f64 #s(literal 0 binary64) phi1)) (cos.f64 delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1) (cos.f64 delta)))
(* (pow phi1 2) (- (* -1 (/ (- (* -1 (/ (cos delta) phi1)) (* -1 (* (cos theta) (sin delta)))) phi1)) (cos delta)))
(*.f64 (*.f64 phi1 phi1) (-.f64 (/.f64 (-.f64 (/.f64 (cos.f64 delta) phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) phi1) (cos.f64 delta)))
(- (cos delta) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))
(- (+ (cos delta) (* 1/2 (* phi1 (* (pow theta 2) (sin delta))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(+.f64 (cos.f64 delta) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* phi1 (* (pow theta 2) (sin delta)))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/24 binary64) phi1) (*.f64 (sin.f64 delta) (*.f64 theta theta))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (sin.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))))
(- (+ (cos delta) (* (pow theta 2) (- (* (pow theta 2) (- (* 1/720 (* phi1 (* (pow theta 2) (sin delta)))) (* 1/24 (* phi1 (sin delta))))) (* -1/2 (* phi1 (sin delta)))))) (* phi1 (+ (sin delta) (* phi1 (cos delta)))))
(+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 (*.f64 phi1 (*.f64 theta theta)) (sin.f64 delta)) #s(literal 1/720 binary64)) (*.f64 #s(literal -1/24 binary64) (*.f64 phi1 (sin.f64 delta))))) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (sin.f64 delta))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta))))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 #s(literal 0 binary64) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 #s(literal 0 binary64) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))) lambda1)) 1)))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 #s(literal 0 binary64) lambda1))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+ lambda1 (atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (+ (* phi1 (* (cos theta) (sin delta))) (* (pow phi1 2) (cos delta)))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (+.f64 (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)) (*.f64 (cos.f64 delta) (*.f64 phi1 phi1)))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (- 1 (* 1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (- (cos delta) (* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))))
(atan2.f64 (*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (/.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (/.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (/.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 phi1))))
(* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (/.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (/.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (/ (* (sin delta) (sin theta)) (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (/.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 phi1 phi1))))
(* delta (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (*.f64 delta (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))
(* delta (+ (* -1/6 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))
(*.f64 delta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(*.f64 delta (+.f64 (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow delta 2) (+ (* -1/6 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(*.f64 delta (+.f64 (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 (sin.f64 theta) #s(literal -1/6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* theta (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))
(*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* 1/120 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))))))))
(*.f64 theta (+.f64 (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))) (* (pow theta 2) (+ (* -1/6 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2))))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))) (* 1/120 (* (sin delta) (+ 1 (* -1/2 (pow phi1 2)))))))))))
(*.f64 theta (+.f64 (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/6 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)))))))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(* (sin delta) (* (sin theta) (+ 1 (* -1/2 (pow phi1 2)))))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(cos delta)
(cos.f64 delta)
(+ (cos delta) (* -1 (* phi1 (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+ (cos delta) (* phi1 (- (* phi1 (+ (* -1 (cos delta)) (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))))) (* (cos theta) (sin delta)))))
(+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2/3 binary64))) (cos.f64 delta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(- (+ 1 (* delta (- (* -1/2 (* delta (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 (*.f64 delta (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 delta (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (+ (* -1/2 (- 1 (pow (sin phi1) 2))) (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (sin delta) (sin phi1))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))
(- (+ (* 1/2 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* (cos delta) (- 1 (pow (sin phi1) 2)))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (cos phi1) (* (sin delta) (sin phi1))))
(+.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 theta theta)) #s(literal 1/2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (+ (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (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 phi1) (* (sin delta) (sin phi1))))
(+.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (*.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))))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))
(-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* theta (* (cos phi1) (sin delta))) (- (* (cos delta) (- 1 (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(+ (* -1/2 (* (pow phi1 2) (* theta (sin delta)))) (* theta (sin delta)))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) theta))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* 1/24 (* (pow phi1 2) (* theta (sin delta)))))))
(+.f64 (*.f64 (sin.f64 delta) theta) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) theta) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* theta (sin delta)) (* (pow phi1 2) (+ (* -1/2 (* theta (sin delta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* theta (sin delta)))) (* 1/24 (* theta (sin delta))))))))
(+.f64 (*.f64 (sin.f64 delta) theta) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 delta) theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) theta) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* delta (* theta (cos phi1)))
(*.f64 (*.f64 delta theta) (cos.f64 phi1))
(* delta (+ (* -1/6 (* (pow delta 2) (* theta (cos phi1)))) (* theta (cos phi1))))
(*.f64 delta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) theta)))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* 1/120 (* (pow delta 2) (* theta (cos phi1))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) theta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* theta (cos phi1)) (* (pow delta 2) (+ (* -1/6 (* theta (cos phi1))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* theta (cos phi1)))) (* 1/120 (* theta (cos phi1)))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 #s(literal -1/6 binary64) theta) (cos.f64 phi1)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
theta
(+ theta (* -1/2 (* (pow phi1 2) theta)))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))
(+ theta (* (pow phi1 2) (+ (* -1/2 theta) (* 1/24 (* (pow phi1 2) theta)))))
(+.f64 theta (*.f64 (*.f64 phi1 phi1) (*.f64 theta (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ theta (* (pow phi1 2) (+ (* -1/2 theta) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) theta)) (* 1/24 theta))))))
(+.f64 theta (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 theta #s(literal -1/2 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 theta (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- (+ 1 (* -1 (* delta (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(-.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(- (+ 1 (* delta (- (* -1 (* delta (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (+ 1 (* delta (- (* delta (- (* 1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))) (+ 1/2 (* -1/2 (pow (sin phi1) 2))))) (* (cos phi1) (* (cos theta) (sin phi1)))))) (pow (sin phi1) 2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 delta (-.f64 (*.f64 delta (-.f64 (*.f64 #s(literal 1/6 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))))) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.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 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))
(+ (cos delta) (* phi1 (- (* -1 (* phi1 (cos delta))) (* (cos theta) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(+ (cos delta) (* phi1 (- (* phi1 (- (* -1 (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta)))))) (cos delta))) (* (cos theta) (sin delta)))))
(+.f64 (cos.f64 delta) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2/3 binary64))) (cos.f64 delta))) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 theta theta)) #s(literal -1 binary64))) (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1))))
(- (+ (cos delta) (* (pow theta 2) (- (* -1/24 (* (pow theta 2) (* (cos phi1) (* (sin delta) (sin phi1))))) (* -1/2 (* (cos phi1) (* (sin delta) (sin phi1))))))) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta)))))
(+.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (*.f64 #s(literal -1/24 binary64) (*.f64 theta theta)) #s(literal 1/2 binary64)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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)))))
(+.f64 (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (*.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))))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta))))))
(-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (cos delta) (* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.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 (sin.f64 delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))))
(+ (* (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 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 theta)) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (*.f64 (cos.f64 phi1) theta) (sin.f64 delta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(*.f64 theta (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow phi1 2) (sin delta))))
(*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow phi1 2) (sin delta))))))
(+.f64 (sin.f64 delta) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ (sin delta) (* (pow phi1 2) (+ (* -1/2 (sin delta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin delta))) (* 1/24 (sin delta)))))))
(+.f64 (sin.f64 delta) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* delta (cos phi1))
(*.f64 (cos.f64 phi1) delta)
(* delta (+ (cos phi1) (* -1/6 (* (pow delta 2) (cos phi1)))))
(*.f64 delta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) (cos.f64 phi1)))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow delta 2) (cos phi1)))))))
(*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 phi1) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (cos phi1) (* (pow delta 2) (+ (* -1/6 (cos phi1)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 delta (+.f64 (cos.f64 phi1) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 phi1) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
(* (cos phi1) (sin delta))
(*.f64 (cos.f64 phi1) (sin.f64 delta))
1
#s(literal 1 binary64)
(+ 1 (* -1 (pow phi1 2)))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
(+ 1 (* (pow phi1 2) (- (* 1/3 (pow phi1 2)) 1)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64)))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64)))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 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 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 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 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 2/15 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))) (* (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 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.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)))))))))
(* (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 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* (cos phi1) (* (cos theta) (sin phi1)))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) #s(literal -1/6 binary64)) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (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 (+.f64 (*.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))))))))
(+.f64 (*.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))) (+.f64 #s(literal -1/2 binary64) (*.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)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (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))) (+.f64 (*.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 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 (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (sin.f64 theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (sin.f64 theta) #s(literal -1/6 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #s(literal 1/120 binary64))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(*.f64 theta (+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/6 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.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))
theta
(* theta (+ 1 (* -1/6 (pow theta 2))))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta))))))
(* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta))))))))
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(sin theta)
(sin.f64 theta)
(* delta (cos theta))
(*.f64 delta (cos.f64 theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(*.f64 delta (*.f64 (+.f64 (*.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 (+.f64 (cos.f64 theta) (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))))
(* 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 (+.f64 (cos.f64 theta) (*.f64 (*.f64 delta delta) (+.f64 (*.f64 (cos.f64 theta) #s(literal -1/6 binary64)) (*.f64 (*.f64 delta delta) (*.f64 (cos.f64 theta) (+.f64 (*.f64 #s(literal -1/5040 binary64) (*.f64 delta delta)) #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))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))
(*.f64 (sin.f64 delta) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* 1/24 (* (pow theta 2) (sin delta))))))
(+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal -1/2 binary64) (*.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)))))))
(+.f64 (sin.f64 delta) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (sin.f64 delta) #s(literal -1/2 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (+.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1/720 binary64) (*.f64 theta 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 theta) (sin delta))
(*.f64 (sin.f64 delta) (cos.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)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64)))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64)))))))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(- 1 (pow (sin phi1) 2))
(-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -1/3 (pow phi1 2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/3 binary64))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* 2/45 (pow phi1 2)) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 2/45 binary64))))))
(* (pow phi1 2) (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/45 (* -1/315 (pow phi1 2)))) 1/3))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/3 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 2/45 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/315 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))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))
(* phi1 (+ (* phi1 (cos delta)) (* (cos theta) (sin delta))))
(*.f64 phi1 (+.f64 (*.f64 phi1 (cos.f64 delta)) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* phi1 (+ (* phi1 (+ (cos delta) (* phi1 (+ (* -1/2 (* (cos theta) (sin delta))) (* -1/6 (* (cos theta) (sin delta))))))) (* (cos theta) (sin delta))))
(*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))))))))
(* 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 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (+.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal -2/3 binary64))) (*.f64 (*.f64 #s(literal -1/3 binary64) phi1) (cos.f64 delta))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(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 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1))))
(+ (* delta (+ (* -1/2 (* delta (pow (sin phi1) 2))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 delta (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))))
(+ (* delta (+ (* delta (+ (* -1/2 (pow (sin phi1) 2)) (* -1/6 (* delta (* (cos phi1) (* (cos theta) (sin phi1))))))) (* (cos phi1) (* (cos theta) (sin phi1))))) (pow (sin phi1) 2))
(+.f64 (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)) (*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 phi1))) (*.f64 delta (+.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 (cos.f64 phi1) delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (sin delta))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.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 (*.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (sin.f64 phi1)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.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))))))))
(+.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1/24 binary64) (*.f64 theta theta))))))
(+ (* (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)))))))))
(+.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1)))) (*.f64 (*.f64 theta theta) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (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))) (+.f64 (*.f64 #s(literal -1/720 binary64) (*.f64 theta theta)) #s(literal 1/24 binary64)))))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (sin phi1) (+ (* (cos delta) (sin phi1)) (* (cos phi1) (* (cos theta) (sin delta)))))
(*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))

eval308.0ms (1.6%)

Memory
42.4MiB live, 497.4MiB allocated
Compiler

Compiled 64 855 to 3 504 computations (94.6% saved)

prune266.0ms (1.4%)

Memory
16.4MiB live, 530.3MiB allocated
Pruning

65 alts after pruning (64 fresh and 1 done)

PrunedKeptTotal
New1 658471 705
Fresh141731
Picked505
Done011
Total1 677651 742
Accuracy
100.0%
Counts
1 742 → 65
Alt Table
Click to see full alt table
StatusAccuracyProgram
23.6%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
23.7%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
25.9%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
12.2%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
30.8%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
20.2%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (cos.f64 delta))
8.5%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))))
14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
14.0%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
11.9%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
10.0%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
7.1%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
11.6%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 delta))
31.0%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
17.4%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
▶30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
25.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
20.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
12.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
20.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
15.3%
(atan2.f64 (*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
47.7%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)))))
99.4%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))))))
▶99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
76.9%
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
86.2%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
75.0%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 theta theta)))))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
74.4%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 theta theta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 theta theta)))))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
74.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
82.3%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta)))) lambda1)
80.8%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 delta (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)) (cos.f64 theta))))))) lambda1)
94.2%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) lambda1)
▶91.9%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
88.5%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
74.9%
(+.f64 (atan2.f64 (*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
73.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
70.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
60.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
49.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))))
72.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
59.0%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
59.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
59.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
91.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 theta) (sin.f64 delta)))) (sin.f64 phi1) (cos.f64 delta))))
94.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (*.f64 (+.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (sin.f64 delta))))))
91.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)))))
▶79.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
79.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta)))))
87.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
59.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
62.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
59.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))))
▶62.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
41.3%
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.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 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
64.8%
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
✓70.3%
lambda1
Compiler

Compiled 4 430 to 2 855 computations (35.6% saved)

simplify705.0ms (3.6%)

Memory
16.4MiB live, 881.6MiB allocated
Algorithm
1×egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓cost-diff0
(cos.f64 phi1)
✓cost-diff0
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
✓cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓cost-diff0
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
✓cost-diff0
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓cost-diff0
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
✓cost-diff128
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))
✓cost-diff0
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
✓cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
✓cost-diff0
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
✓cost-diff0
(*.f64 (sin.f64 theta) (cos.f64 phi1))
✓cost-diff0
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
✓cost-diff0
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓cost-diff0
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
Rules
30 208×accelerator-lowering-fma.f32
30 208×accelerator-lowering-fma.f64
4 754×*-lowering-*.f32
4 754×*-lowering-*.f64
2 344×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
046607
1106607
2234607
3544607
4820607
51204607
61589607
72374607
83129607
93625607
104308607
115065607
125764607
136043607
146352607
156543607
166767607
176928607
08836590
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(+ (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)
(atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (* (sin theta) (cos phi1)) (sin delta))
(* (sin theta) (cos phi1))
(sin theta)
theta
(cos phi1)
phi1
(sin delta)
delta
(- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(cos delta)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
1/2
(* 1/2 (cos (* phi1 2)))
(cos (* phi1 2))
(* phi1 2)
2
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(sin phi1)
(* (cos phi1) (* (sin delta) (cos theta)))
(* (sin delta) (cos theta))
(cos theta)
lambda1
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1))))
lambda1
(atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1)))
(* (sin delta) (sin theta))
(sin delta)
delta
(sin theta)
theta
(- 1 (* phi1 phi1))
1
(* phi1 phi1)
phi1
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2))))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(sin theta)
theta
(sin delta)
delta
(cos phi1)
phi1
(+ 1/2 (* 1/2 (cos (* phi1 2))))
1/2
(* 1/2 (cos (* phi1 2)))
(cos (* phi1 2))
(* phi1 2)
2
(+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(cos phi1)
phi1
(* (sin delta) (sin theta))
(sin delta)
delta
(sin theta)
theta
(- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta)))))
(* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(cos delta)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
1/2
(* 1/2 (cos (* phi1 2)))
(cos (* phi1 2))
(* phi1 2)
2
(* (sin phi1) (* 1 (* (sin delta) (cos theta))))
(sin phi1)
(* 1 (* (sin delta) (cos theta)))
1
(* (sin delta) (cos theta))
(cos theta)
lambda1
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(cos phi1)
phi1
(* (sin delta) (sin theta))
(sin delta)
delta
(sin theta)
theta
(- (* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta))
(/ (+ (cos (* phi1 2)) 1) 2)
(+ (cos (* phi1 2)) 1)
(cos (* phi1 2))
(* phi1 2)
2
1
(cos delta)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(sin phi1)
(* (cos phi1) (* (sin delta) (cos theta)))
(* (sin delta) (cos theta))
(cos theta)
Outputs
(+ (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(* (* (sin theta) (cos phi1)) (sin delta))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(* (sin theta) (cos phi1))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(sin theta)
(sin.f64 theta)
theta
(cos phi1)
(cos.f64 phi1)
phi1
(sin delta)
(sin.f64 delta)
delta
(- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64)))
(cos delta)
(cos.f64 delta)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* phi1 2)))
(/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64))
(cos (* phi1 2))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* phi1 2)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(sin phi1)
(sin.f64 phi1)
(* (cos phi1) (* (sin delta) (cos theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
lambda1
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
lambda1
(atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1)))
(atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- 1 (* phi1 phi1))
(-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))
1
#s(literal 1 binary64)
(* phi1 phi1)
(*.f64 phi1 phi1)
phi1
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))))
lambda1
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64))))
(* (* (sin theta) (sin delta)) (cos phi1))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(* (sin theta) (sin delta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin theta)
(sin.f64 theta)
theta
(sin delta)
(sin.f64 delta)
delta
(cos phi1)
(cos.f64 phi1)
phi1
(+ 1/2 (* 1/2 (cos (* phi1 2))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* phi1 2)))
(/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64))
(cos (* phi1 2))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* phi1 2)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(cos phi1)
(cos.f64 phi1)
phi1
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta)))))
(-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64)))
(cos delta)
(cos.f64 delta)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
(+.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* phi1 2)))
(/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64))
(cos (* phi1 2))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* phi1 2)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (sin phi1) (* 1 (* (sin delta) (cos theta))))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(sin phi1)
(sin.f64 phi1)
(* 1 (* (sin delta) (cos theta)))
(*.f64 (sin.f64 delta) (cos.f64 theta))
1
#s(literal 1 binary64)
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)
lambda1
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(cos phi1)
(cos.f64 phi1)
phi1
(* (sin delta) (sin theta))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(sin delta)
(sin.f64 delta)
delta
(sin theta)
(sin.f64 theta)
theta
(- (* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))
(-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 delta) #s(literal 2 binary64)))
(/ (+ (cos (* phi1 2)) 1) 2)
(+.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))
(+ (cos (* phi1 2)) 1)
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(cos (* phi1 2))
(cos.f64 (*.f64 phi1 #s(literal 2 binary64)))
(* phi1 2)
(*.f64 phi1 #s(literal 2 binary64))
2
#s(literal 2 binary64)
1
#s(literal 1 binary64)
(cos delta)
(cos.f64 delta)
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(sin phi1)
(sin.f64 phi1)
(* (cos phi1) (* (sin delta) (cos theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(* (sin delta) (cos theta))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(cos theta)
(cos.f64 theta)

localize278.0ms (1.4%)

Memory
-35.7MiB live, 409.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓accuracy99.5%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
✓accuracy99.4%
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
✓accuracy99.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓accuracy99.7%
(*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓accuracy99.4%
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
✓accuracy99.8%
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
✓accuracy99.7%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
✓accuracy99.7%
(*.f64 (sin.f64 theta) (sin.f64 delta))
✓accuracy99.4%
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
✓accuracy100.0%
(sin.f64 delta)
✓accuracy100.0%
(sin.f64 theta)
✓accuracy100.0%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
✓accuracy99.7%
(*.f64 (sin.f64 delta) (sin.f64 theta))
✓accuracy99.7%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
✓accuracy99.6%
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
✓accuracy99.5%
(*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
✓accuracy99.4%
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
Samples
147.0ms256×0valid
Compiler

Compiled 619 to 49 computations (92.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 112.0ms
ival-mult: 46.0ms (41.1% of total)
ival-cos: 26.0ms (23.2% of total)
ival-sin: 16.0ms (14.3% of total)
ival-atan2: 9.0ms (8% of total)
ival-add: 7.0ms (6.2% of total)
ival-sub: 4.0ms (3.6% of total)
ival-div: 2.0ms (1.8% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)
exact: 0.0ms (0% of total)

series40.0ms (0.2%)

Memory
-1.8MiB live, 75.8MiB allocated
Counts
23 → 708
Calls
Call 1
Inputs
#<alt (+ (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)>
#<alt (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))>
#<alt (* (* (sin theta) (cos phi1)) (sin delta))>
#<alt (* (sin theta) (cos phi1))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1))))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1)))>
#<alt (* (sin delta) (sin theta))>
#<alt (sin delta)>
#<alt (+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2))))))>
#<alt (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2)))))>
#<alt (* (* (sin theta) (sin delta)) (cos phi1))>
#<alt (* (sin theta) (sin delta))>
#<alt (* 1 (* (sin delta) (cos theta)))>
#<alt (+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta)))))) lambda1)>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta))))))>
#<alt (* (cos phi1) (* (sin delta) (sin theta)))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))>
#<alt (cos phi1)>
#<alt (+ 1/2 (* 1/2 (cos (* phi1 2))))>
#<alt (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))>
#<alt (sin theta)>
#<alt (* (sin phi1) (* 1 (* (sin delta) (cos theta))))>
#<alt (+ (cos (* phi1 2)) 1)>
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 (* 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 (+ 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 (* 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 (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 (* 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 (* (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 (* 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 (* theta (cos phi1))>
#<alt (* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))>
#<alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))>
#<alt (* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (sin theta)>
#<alt (+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))>
#<alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))>
#<alt (+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (* (cos phi1) (sin theta))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<alt (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))>
#<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))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))>
#<alt (* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)) 1)))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)) 1)))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 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 (* 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 (* 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))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))>
#<alt (+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 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 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 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 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 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 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 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1)))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))>
#<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 (* 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 (* 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 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))>
#<alt (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (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 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 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 (* 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 (* 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 (* (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 2>
#<alt (+ 2 (* -2 (pow phi1 2)))>
#<alt (+ 2 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))>
#<alt (+ 2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
#<alt (+ 1 (cos (* 2 phi1)))>
Calls

177 calls:

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

rewrite387.0ms (2%)

Memory
25.9MiB live, 703.6MiB allocated
Algorithm
1×batch-egg-rewrite
Rules
4 416×accelerator-lowering-fma.f32
4 416×accelerator-lowering-fma.f64
4 212×/-lowering-/.f32
4 212×/-lowering-/.f64
3 770×*-lowering-*.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
046301
1248301
21926269
08424269
Stop Event
1×iter limit
1×node limit
Counts
23 → 360
Calls
Call 1
Inputs
(+ (atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta)))))) lambda1)
(atan2 (* (* (sin theta) (cos phi1)) (sin delta)) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(* (* (sin theta) (cos phi1)) (sin delta))
(* (sin theta) (cos phi1))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1))))
(atan2 (* (sin delta) (sin theta)) (- 1 (* phi1 phi1)))
(* (sin delta) (sin theta))
(sin delta)
(+ lambda1 (atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2))))))
(atan2 (* (* (sin theta) (sin delta)) (cos phi1)) (+ 1/2 (* 1/2 (cos (* phi1 2)))))
(* (* (sin theta) (sin delta)) (cos phi1))
(* (sin theta) (sin delta))
(* 1 (* (sin delta) (cos theta)))
(+ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta)))))) lambda1)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* phi1 2))))) (* (sin phi1) (* 1 (* (sin delta) (cos theta))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (/ (+ (cos (* phi1 2)) 1) 2) (cos delta)) (* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))))
(cos phi1)
(+ 1/2 (* 1/2 (cos (* phi1 2))))
(* (sin phi1) (* (cos phi1) (* (sin delta) (cos theta))))
(sin theta)
(* (sin phi1) (* 1 (* (sin delta) (cos theta))))
(+ (cos (* phi1 2)) 1)
Outputs
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (cos.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #s(literal 1 binary64)))
(/.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (cos.f64 phi1)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (cos.f64 phi1))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (cos.f64 phi1))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) #s(literal 1/2 binary64))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(sin.f64 delta)
(*.f64 (sin.f64 delta) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1))))
(/.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(-.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(-.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64)))
(/.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (-.f64 (*.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (+.f64 theta delta)))) #s(literal 4 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64))) (+.f64 (*.f64 (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))) (*.f64 (/.f64 (cos.f64 (-.f64 delta theta)) #s(literal 2 binary64)) (/.f64 (cos.f64 (+.f64 theta delta)) #s(literal 2 binary64))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal -1 binary64))
(*.f64 (sin.f64 theta) (sin.f64 delta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) #s(literal 1 binary64))))
(/.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) #s(literal -2 binary64))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (neg.f64 (neg.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) #s(literal 1 binary64))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal -1 binary64))
(*.f64 (sin.f64 delta) (cos.f64 theta))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) #s(literal 1 binary64)))
(*.f64 (cos.f64 theta) (sin.f64 delta))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 theta)) (sin.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)
(-.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64))) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (neg.f64 (neg.f64 (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1))) (*.f64 (/.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)) (/.f64 (*.f64 lambda1 lambda1) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 3 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))))
(*.f64 (-.f64 (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))))
(/.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 delta) (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 theta phi1)) (sin.f64 (+.f64 theta phi1))) (sin.f64 delta))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 theta delta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (-.f64 (cos.f64 (-.f64 delta theta)) (cos.f64 (+.f64 theta delta))) (cos.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta)))
(*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta))
(*.f64 (sin.f64 delta) (*.f64 (sin.f64 theta) (cos.f64 phi1)))
(*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta))
(atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(cos.f64 phi1)
(+.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))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -2 binary64)))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 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/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 binary64))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) #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 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (-.f64 (*.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) (-.f64 (*.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))
(neg.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.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/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/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))))
(/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.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/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.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/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64))) (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) #s(literal 1/4 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 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) #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 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(/.f64 (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))
(/.f64 (+.f64 (cos.f64 (+.f64 phi1 phi1)) (cos.f64 (-.f64 phi1 phi1))) #s(literal 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 phi1 #s(literal 2 binary64)))))) (*.f64 (+.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) (*.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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.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 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) #s(literal -2 binary64))
(/.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 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.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 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (+.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/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (/.f64 #s(literal 1/4 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 (+.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/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 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/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))))
(pow.f64 (cos.f64 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))) #s(literal -1 binary64))
(*.f64 (cos.f64 phi1) (cos.f64 phi1))
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal -1/2 binary64))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/4 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))))
(/.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(*.f64 (cos.f64 phi1) (*.f64 (sin.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 (sin.f64 delta) (cos.f64 theta)) (*.f64 (cos.f64 phi1) (sin.f64 phi1)))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (sin.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))) #s(literal 1 binary64))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) (cos.f64 phi1))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))
(*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(sin.f64 theta)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) (sin.f64 phi1))))
(/.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta)))) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) (sin.f64 phi1)) #s(literal 2 binary64))
(/.f64 (neg.f64 (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))))) #s(literal -2 binary64))
(/.f64 (neg.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) (sin.f64 phi1))) #s(literal -2 binary64))
(*.f64 (sin.f64 delta) (*.f64 (cos.f64 theta) (sin.f64 phi1)))
(*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (sin.f64 phi1))
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))
(*.f64 (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))) #s(literal 1 binary64))
(*.f64 (*.f64 (sin.f64 phi1) (sin.f64 delta)) (cos.f64 theta))
(*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) (sin.f64 delta))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(fma.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64) #s(literal 1 binary64))
(fma.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #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 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))
(/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (neg.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #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 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64))) (neg.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64))) (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))))) (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 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)))) (neg.f64 (neg.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.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 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) (/.f64 (+.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 binary64)))) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))) (*.f64 (/.f64 (+.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 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #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 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))

simplify696.0ms (3.6%)

Memory
25.1MiB live, 1 127.9MiB allocated
Algorithm
1×egg-herbie
Rules
17 078×accelerator-lowering-fma.f32
17 078×accelerator-lowering-fma.f64
7 560×*-lowering-*.f32
7 560×*-lowering-*.f64
5 534×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
043512756
1147512428
2499312298
0818411831
Stop Event
1×iter limit
1×node limit
Counts
708 → 708
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 (* 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)))))))
(+ 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 (* 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))))))
(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))))))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (cos phi1))
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(sin theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(* (cos phi1) (sin theta))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(* delta (sin theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* 1/120 (* (pow delta 2) (sin theta)))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* theta (sin delta))
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (sin delta))) (* 1/120 (sin delta))))))))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
(* (sin delta) (sin theta))
delta
(* delta (+ 1 (* -1/6 (pow delta 2))))
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(sin delta)
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)) 1)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)) 1)))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 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)))
(* 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))
(* 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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 theta) (* (sin delta) (sin phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 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 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 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 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 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 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 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 theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(* (sin delta) (sin theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* 1/24 (* (pow phi1 2) (* (sin delta) (sin theta)))))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* delta (* (cos phi1) (sin theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* theta (* (cos phi1) (sin delta)))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* 1/120 (* (cos phi1) (sin delta)))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (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)
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))))
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)
(* 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)))
(* 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)))
(* (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)))
2
(+ 2 (* -2 (pow phi1 2)))
(+ 2 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(+ 2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 phi1)))
(+ 1 (cos (* 2 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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 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))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 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)))
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos phi1) (* (cos theta) (* (sin delta) (sin phi1)))))) lambda1)) 1)))
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (cos.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 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 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (sin.f64 theta))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 delta (*.f64 delta (sin.f64 theta)))) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (cos phi1))
(*.f64 (cos.f64 phi1) theta)
(* theta (+ (cos phi1) (* -1/6 (* (pow theta 2) (cos phi1)))))
(*.f64 (cos.f64 phi1) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* 1/120 (* (pow theta 2) (cos phi1)))))))
(*.f64 theta (*.f64 (cos.f64 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))
(* theta (+ (cos phi1) (* (pow theta 2) (+ (* -1/6 (cos phi1)) (* (pow theta 2) (+ (* -1/5040 (* (pow theta 2) (cos phi1))) (* 1/120 (cos phi1))))))))
(*.f64 theta (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (cos.f64 phi1)) (*.f64 (*.f64 theta theta) (*.f64 (cos.f64 phi1) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 binary64)))))))))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(sin theta)
(sin.f64 theta)
(+ (sin theta) (* -1/2 (* (pow phi1 2) (sin theta))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (sin.f64 theta))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* 1/24 (* (pow phi1 2) (sin theta))))))
(*.f64 (sin.f64 theta) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (sin theta) (* (pow phi1 2) (+ (* -1/2 (sin theta)) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (sin theta))) (* 1/24 (sin theta)))))))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (sin.f64 theta)) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 theta) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64))))))))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(* (cos phi1) (sin theta))
(*.f64 (cos.f64 phi1) (sin.f64 theta))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))) lambda1)) 1)))
(*.f64 (-.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+ lambda1 (atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(atan2 (* (sin delta) (sin theta)) (- 1 (pow phi1 2)))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta 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) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (sin.f64 theta)) (*.f64 delta (*.f64 delta (*.f64 (*.f64 delta (*.f64 delta (sin.f64 theta))) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 binary64)))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
delta
(* delta (+ 1 (* -1/6 (pow delta 2))))
(*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))
(* delta (+ 1 (* (pow delta 2) (- (* 1/120 (pow delta 2)) 1/6))))
(*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ 1 (* (pow delta 2) (- (* (pow delta 2) (+ 1/120 (* -1/5040 (pow delta 2)))) 1/6))))
(*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 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))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1))))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (+ 1/2 (* 1/2 (cos (* 2 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
(* 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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (cos.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 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 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 delta (*.f64 delta (sin.f64 theta)))) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 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 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (sin.f64 theta))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (sin delta))
(*.f64 (sin.f64 delta) theta)
(* theta (+ (sin delta) (* -1/6 (* (pow theta 2) (sin delta)))))
(*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (sin delta) (* (pow theta 2) (+ (* -1/6 (sin delta)) (* 1/120 (* (pow theta 2) (sin delta)))))))
(*.f64 theta (*.f64 (sin.f64 delta) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (sin.f64 delta)) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 delta) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 binary64)))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (sin theta))
(*.f64 delta (sin.f64 theta))
(* delta (+ (sin theta) (* -1/6 (* (pow delta 2) (sin theta)))))
(*.f64 delta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta 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) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (sin theta) (* (pow delta 2) (+ (* -1/6 (sin theta)) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (sin theta))) (* 1/120 (sin theta))))))))
(*.f64 delta (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (sin.f64 theta)) (*.f64 delta (*.f64 delta (*.f64 (*.f64 delta (*.f64 delta (sin.f64 theta))) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64)))))))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(* delta (cos theta))
(*.f64 delta (cos.f64 theta))
(* delta (+ (cos theta) (* -1/6 (* (pow delta 2) (cos theta)))))
(*.f64 (cos.f64 theta) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))))
(* delta (+ (cos theta) (* (pow delta 2) (+ (* -1/6 (cos theta)) (* 1/120 (* (pow delta 2) (cos theta)))))))
(*.f64 delta (*.f64 (cos.f64 theta) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* 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 (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (cos.f64 theta)) (*.f64 delta (*.f64 delta (*.f64 (*.f64 delta (*.f64 delta (cos.f64 theta))) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 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))
(sin delta)
(sin.f64 delta)
(+ (sin delta) (* -1/2 (* (pow theta 2) (sin delta))))
(*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #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 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/24 binary64)))))
(+ (sin delta) (* (pow theta 2) (+ (* -1/2 (sin delta)) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (sin delta))) (* 1/24 (sin delta)))))))
(+.f64 (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (sin.f64 delta)) (*.f64 (*.f64 (sin.f64 delta) (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/720 binary64)) #s(literal 1/24 binary64))) (*.f64 (*.f64 theta theta) (*.f64 theta theta))))
(* (cos theta) (sin delta))
(*.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))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
(+ lambda1 (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
lambda1
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)))
(* lambda1 (+ 1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)))
lambda1
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(*.f64 lambda1 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(*.f64 lambda1 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))
(* -1 (* lambda1 (- (* -1 (/ (atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1))))) lambda1)) 1)))
(*.f64 lambda1 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)) #s(literal 1 binary64)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* (cos delta) (+ 1/2 (* 1/2 (cos (* 2 phi1))))) (* (cos theta) (* (sin delta) (sin phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(* (sin delta) (sin theta))
(*.f64 (sin.f64 delta) (sin.f64 theta))
(+ (* -1/2 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* (sin delta) (sin theta)))
(*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin theta)) (* (pow phi1 2) (+ (* -1/2 (* (sin delta) (sin theta))) (* (pow phi1 2) (+ (* -1/720 (* (pow phi1 2) (* (sin delta) (sin theta)))) (* 1/24 (* (sin delta) (sin theta))))))))
(+.f64 (*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (sin.f64 theta))) (*.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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)))
(* delta (* (cos phi1) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 delta (sin.f64 theta)))
(* delta (+ (* -1/6 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* (cos phi1) (sin theta))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* 1/120 (* (pow delta 2) (* (cos phi1) (sin theta))))))))
(*.f64 delta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (* (cos phi1) (sin theta)) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (sin theta))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (sin theta)))) (* 1/120 (* (cos phi1) (sin theta)))))))))
(*.f64 delta (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (sin.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 delta (*.f64 delta (sin.f64 theta)))) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* (cos phi1) (* (sin delta) (sin theta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta)))
(* theta (* (cos phi1) (sin delta)))
(*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta))
(* theta (+ (* -1/6 (* (pow theta 2) (* (cos phi1) (sin delta)))) (* (cos phi1) (sin delta))))
(*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))
(* theta (+ (* (cos phi1) (sin delta)) (* (pow theta 2) (+ (* -1/6 (* (cos phi1) (sin delta))) (* 1/120 (* (pow theta 2) (* (cos phi1) (sin delta))))))))
(*.f64 theta (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.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 (+.f64 (*.f64 (sin.f64 delta) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (cos.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 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)))
(atan2 (* (cos phi1) (* (sin delta) (sin theta))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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))) (- (* 1/2 (* (cos delta) (+ 1 (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 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #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/2 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))
(+ 1 (* (pow phi1 2) (- (* 1/24 (pow phi1 2)) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64))))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/24 (* -1/720 (pow phi1 2)))) 1/2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 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)
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)))
(+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal -1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/3 binary64))))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3 (* -2/45 (pow phi1 2)))) 1)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2/45 binary64))))))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(+ 1/2 (* 1/2 (cos (* 2 phi1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1))
(* 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)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #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 (+.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 phi1 (*.f64 phi1 (sin.f64 delta)))) #s(literal 2/15 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))) (* (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 (+.f64 (*.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.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))))))))
(* (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 (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 delta (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 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (cos.f64 theta))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* delta (+ (* (cos phi1) (* (cos theta) (sin phi1))) (* (pow delta 2) (+ (* -1/6 (* (cos phi1) (* (cos theta) (sin phi1)))) (* (pow delta 2) (+ (* -1/5040 (* (pow delta 2) (* (cos phi1) (* (cos theta) (sin phi1))))) (* 1/120 (* (cos phi1) (* (cos theta) (sin phi1))))))))))
(*.f64 delta (+.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 phi1) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (cos.f64 theta)))) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64)))))) (*.f64 (*.f64 delta delta) (*.f64 delta 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))))
(* (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 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #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 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (+.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/24 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)))))))))
(+.f64 (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1)))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 (sin.f64 phi1) (*.f64 theta theta)))) (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))
(* (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))))
theta
(* theta (+ 1 (* -1/6 (pow theta 2))))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))
(* theta (+ 1 (* (pow theta 2) (- (* 1/120 (pow theta 2)) 1/6))))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)))))))
(* theta (+ 1 (* (pow theta 2) (- (* (pow theta 2) (+ 1/120 (* -1/5040 (pow theta 2)))) 1/6))))
(*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 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)
(* phi1 (* (cos theta) (sin delta)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1))
(* phi1 (+ (* -1/6 (* (pow phi1 2) (* (cos theta) (sin delta)))) (* (cos theta) (sin delta))))
(*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) phi1)))
(* 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 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 #s(literal 1/120 binary64) (*.f64 phi1 phi1))))))
(* 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 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 phi1 phi1)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (cos.f64 theta))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (cos.f64 theta) (*.f64 phi1 (*.f64 phi1 (sin.f64 delta)))) (+.f64 #s(literal 1/120 binary64) (*.f64 #s(literal -1/5040 binary64) (*.f64 phi1 phi1)))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 theta) (*.f64 delta (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 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (*.f64 delta delta) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta))))))
(* 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 (+.f64 (*.f64 (sin.f64 phi1) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (cos.f64 theta))) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 delta delta) (*.f64 (*.f64 (cos.f64 theta) (sin.f64 phi1)) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64)))))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (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 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #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 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) #s(literal 1/24 binary64)))))
(+ (* (sin delta) (sin phi1)) (* (pow theta 2) (+ (* -1/2 (* (sin delta) (sin phi1))) (* (pow theta 2) (+ (* -1/720 (* (pow theta 2) (* (sin delta) (sin phi1)))) (* 1/24 (* (sin delta) (sin phi1))))))))
(+.f64 (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))) (*.f64 (*.f64 theta theta) (*.f64 (*.f64 theta theta) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/720 binary64)) #s(literal 1/24 binary64)))))))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
(* (cos theta) (* (sin delta) (sin phi1)))
(*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))
2
#s(literal 2 binary64)
(+ 2 (* -2 (pow phi1 2)))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -2 binary64)))
(+ 2 (* (pow phi1 2) (- (* 2/3 (pow phi1 2)) 2)))
(+.f64 #s(literal 2 binary64) (*.f64 phi1 (*.f64 phi1 (+.f64 #s(literal -2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 2/3 binary64))))))
(+ 2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 2/3 (* -4/45 (pow phi1 2)))) 2)))
(+.f64 #s(literal 2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 2/3 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -4/45 binary64)))))))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))
(+ 1 (cos (* 2 phi1)))
(+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))

eval336.0ms (1.7%)

Memory
21.8MiB live, 550.9MiB allocated
Compiler

Compiled 56 843 to 2 794 computations (95.1% saved)

prune481.0ms (2.5%)

Memory
-244.8MiB live, 924.4MiB allocated
Pruning

90 alts after pruning (87 fresh and 3 done)

PrunedKeptTotal
New1 575521 627
Fresh243559
Picked325
Done011
Total1 602901 692
Accuracy
100.0%
Counts
1 692 → 90
Alt Table
Click to see full alt table
StatusAccuracyProgram
31.0%
(atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
15.3%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
31.0%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
23.6%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
25.9%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (*.f64 (cos.f64 delta) (sin.f64 phi1))))))
30.8%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) delta)))) (pow.f64 (*.f64 (sin.f64 phi1) (+.f64 (*.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 binary64) (+.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))))
20.2%
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (cos.f64 delta))
8.5%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))))) (cos.f64 delta)) #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 delta theta)))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))))
14.0%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 theta theta)) #s(literal 1 binary64)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
14.7%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
11.9%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
10.0%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
7.1%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
11.6%
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 delta))
8.7%
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
14.8%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
15.4%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal 1/120 binary64) (*.f64 (*.f64 theta theta) #s(literal -1/5040 binary64)))))))))))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
15.3%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
31.0%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
17.5%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (/.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
15.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (*.f64 delta (sin.f64 phi1)))))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 phi1)) (cos.f64 theta)) (sin.f64 delta))))
13.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))) (cos.f64 theta))))))
14.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (cos.f64 theta))))))
17.8%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))))
25.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
25.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
30.9%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
23.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
20.7%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
12.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
12.3%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))
20.2%
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
15.3%
(atan2.f64 (*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (sin.f64 phi1) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (cos.f64 theta) (sin.f64 delta)))))))
47.7%
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta))))))) (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))) #s(literal 2 binary64)))))
91.7%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))))
79.1%
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
74.4%
(+.f64 (atan2.f64 (*.f64 (*.f64 (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64))))))) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
99.9%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
81.0%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (cos.f64 theta)))))) lambda1)
✓99.8%
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
99.7%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (sin.f64 delta) (cos.f64 phi1))) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))))) lambda1)
91.9%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))) lambda1)
79.3%
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)
86.3%
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
91.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 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
91.7%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (/.f64 (*.f64 (+.f64 (sin.f64 (-.f64 delta theta)) (sin.f64 (+.f64 theta delta))) (sin.f64 phi1)) #s(literal 2 binary64)))) lambda1)
80.2%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)
94.2%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) lambda1)
91.6%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 delta)))) lambda1)
87.6%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
73.3%
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
74.9%
(+.f64 (atan2.f64 (*.f64 theta (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))) (*.f64 (cos.f64 phi1) (sin.f64 delta)))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
62.9%
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
73.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
70.5%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
60.1%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
49.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))))
72.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
59.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
59.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
79.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
41.4%
(+.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 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))))
79.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
79.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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)))))))
41.4%
(+.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 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 2 binary64)))))
91.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)))))
41.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))))
79.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta)))))
87.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
75.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
59.2%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
67.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
73.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
59.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
59.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
59.3%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
76.8%
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (cos.f64 phi1)) (sin.f64 theta)) (fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (cos.f64 delta) (sin.f64 phi1)) (*.f64 (sin.f64 delta) (*.f64 (cos.f64 phi1) (cos.f64 theta))))) (sin.f64 phi1) (cos.f64 delta))))
56.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
57.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
✓62.9%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
74.4%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
57.7%
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
62.2%
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
39.4%
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
62.8%
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
91.5%
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)))
✓70.3%
lambda1
Compiler

Compiled 8 017 to 2 747 computations (65.7% saved)

regimes374.0ms (1.9%)

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

7 calls:

54.0ms
lambda1
49.0ms
theta
47.0ms
delta
47.0ms
phi1
46.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.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)

regimes362.0ms (1.9%)

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

5 calls:

80.0ms
theta
67.0ms
phi2
59.0ms
delta
49.0ms
phi1
45.0ms
lambda1
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes328.0ms (1.7%)

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

5 calls:

76.0ms
theta
61.0ms
phi1
51.0ms
lambda1
45.0ms
delta
35.0ms
phi2
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes281.0ms (1.4%)

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

5 calls:

66.0ms
phi1
50.0ms
phi2
35.0ms
lambda1
33.0ms
theta
33.0ms
delta
Results
AccuracySegmentsBranch
99.8%1lambda1
99.8%1phi1
99.8%1phi2
99.8%1delta
99.8%1theta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes278.0ms (1.4%)

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

5 calls:

91.0ms
theta
43.0ms
lambda1
41.0ms
phi2
34.0ms
phi1
33.0ms
delta
Results
AccuracySegmentsBranch
94.2%1lambda1
94.2%1phi1
94.2%1phi2
94.2%1delta
94.2%1theta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes157.0ms (0.8%)

Memory
-3.1MiB live, 270.3MiB allocated
Counts
70 → 1
Calls
Call 1
Inputs
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (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 delta) (*.f64 phi1 (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (pow.f64 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 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 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (*.f64 (cos.f64 phi1) (-.f64 (cos.f64 phi1) (*.f64 (*.f64 (sin.f64 phi1) (cos.f64 theta)) delta)))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 delta) (cos.f64 theta)) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 delta)))) lambda1)
(+.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (*.f64 theta theta) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (sin.f64 delta) (sin.f64 phi1))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 3 binary64))) (*.f64 #s(literal 2 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta))))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))) (cos.f64 delta)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (*.f64 (sin.f64 phi1) (+.f64 (sin.f64 phi1) (*.f64 (*.f64 (cos.f64 phi1) delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) #s(literal 1 binary64)) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (cos.f64 delta) #s(literal 1/2 binary64))) (*.f64 (cos.f64 theta) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (/.f64 (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)) (cos.f64 delta)) (*.f64 (cos.f64 phi1) (*.f64 (sin.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 delta)))) lambda1)
Calls

5 calls:

58.0ms
delta
24.0ms
phi1
23.0ms
theta
20.0ms
phi2
20.0ms
lambda1
Results
AccuracySegmentsBranch
91.6%1theta
91.6%1lambda1
91.6%1phi2
91.6%1phi1
91.6%1delta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes126.0ms (0.6%)

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

5 calls:

48.0ms
theta
20.0ms
lambda1
17.0ms
phi2
17.0ms
delta
15.0ms
phi1
Results
AccuracySegmentsBranch
91.1%1phi1
91.1%1delta
91.1%1lambda1
91.1%1phi2
91.1%1theta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes74.0ms (0.4%)

Memory
-9.2MiB live, 149.8MiB allocated
Counts
46 → 3
Calls
Call 1
Inputs
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta)))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (*.f64 (cos.f64 delta) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (cos.f64 delta))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))
(+.f64 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) lambda1)
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.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))))
(atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 (*.f64 phi1 (cos.f64 theta)) (sin.f64 delta)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (cos.f64 delta) (*.f64 phi1 (+.f64 (sin.f64 delta) (*.f64 phi1 (cos.f64 delta)))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi1 #s(literal 2 binary64)))))) #s(literal -1 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 phi1 #s(literal 2 binary64))) #s(literal -1 binary64))))))
(atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (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 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))
Calls

5 calls:

14.0ms
theta
13.0ms
lambda1
13.0ms
phi2
13.0ms
delta
13.0ms
phi1
Results
AccuracySegmentsBranch
91.2%3delta
87.4%1lambda1
87.4%1theta
87.4%1phi1
87.4%1phi2
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes16.0ms (0.1%)

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

1 calls:

10.0ms
delta
Results
AccuracySegmentsBranch
91.2%3delta
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes58.0ms (0.3%)

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

5 calls:

12.0ms
theta
9.0ms
phi1
9.0ms
delta
9.0ms
lambda1
9.0ms
phi2
Results
AccuracySegmentsBranch
75.3%1lambda1
86.2%3phi1
81.4%4theta
76.9%2phi2
85.9%3delta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes28.0ms (0.1%)

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

3 calls:

9.0ms
theta
8.0ms
phi1
7.0ms
delta
Results
AccuracySegmentsBranch
76.9%2theta
77.8%2delta
75.3%1phi1
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes42.0ms (0.2%)

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

5 calls:

9.0ms
theta
7.0ms
phi1
7.0ms
delta
7.0ms
phi2
7.0ms
lambda1
Results
AccuracySegmentsBranch
75.3%1lambda1
75.3%1phi1
75.3%1theta
75.3%1phi2
75.3%1delta
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes32.0ms (0.2%)

Memory
24.4MiB live, 63.7MiB allocated
Counts
20 → 2
Calls
Call 1
Inputs
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) theta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 theta (*.f64 theta (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 theta theta) #s(literal 1/120 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 #s(literal 1/120 binary64) (*.f64 delta delta)))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 delta delta) (+.f64 #s(literal 1/120 binary64) (*.f64 delta (*.f64 delta #s(literal -1/5040 binary64))))))))) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 delta) theta) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (/.f64 (atan2.f64 (*.f64 (sin.f64 delta) (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))) lambda1)))
(+.f64 lambda1 (atan2.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 theta) (sin.f64 delta)))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 delta (*.f64 (sin.f64 theta) (+.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta)) #s(literal 1 binary64)))) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (*.f64 theta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 theta theta)))) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/24 binary64)))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/24 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/720 binary64)))))))) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
(atan2.f64 (*.f64 (*.f64 theta (cos.f64 phi1)) (sin.f64 delta)) (cos.f64 delta))
Outputs
lambda1
(+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1))))
Calls

5 calls:

6.0ms
theta
6.0ms
phi2
6.0ms
delta
6.0ms
phi1
6.0ms
lambda1
Results
AccuracySegmentsBranch
70.3%1lambda1
70.3%1theta
73.5%3phi1
72.2%2delta
70.3%1phi2
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes5.0ms (0%)

Memory
-27.5MiB live, 12.0MiB allocated
Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
lambda1
Outputs
lambda1
Calls

3 calls:

1.0ms
theta
1.0ms
delta
1.0ms
phi1
Results
AccuracySegmentsBranch
70.3%1theta
70.3%1phi1
70.3%1delta
Compiler

Compiled 18 to 15 computations (16.7% saved)

bsearch91.0ms (0.5%)

Memory
13.3MiB live, 175.0MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
44.0ms
1.2165359854003338e-11
0.0005246294583936931
40.0ms
-0.8606887581652374
-6.949880576328611e-6
Samples
73.0ms288×0valid
Compiler

Compiled 761 to 553 computations (27.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 60.0ms
ival-sin: 19.0ms (31.4% of total)
ival-cos: 14.0ms (23.1% of total)
ival-asin: 11.0ms (18.2% of total)
ival-mult: 10.0ms (16.5% of total)
ival-add: 3.0ms (5% of total)
ival-atan2: 3.0ms (5% of total)
ival-sub: 1.0ms (1.7% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch109.0ms (0.6%)

Memory
13.7MiB live, 171.7MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
60.0ms
1.2165359854003338e-11
0.0005246294583936931
42.0ms
-0.8606887581652374
-6.949880576328611e-6
Samples
90.0ms288×0valid
Compiler

Compiled 959 to 715 computations (25.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 80.0ms
ival-sin: 45.0ms (56.4% of total)
ival-cos: 14.0ms (17.6% of total)
ival-mult: 10.0ms (12.5% of total)
ival-asin: 5.0ms (6.3% of total)
ival-add: 3.0ms (3.8% of total)
ival-atan2: 3.0ms (3.8% of total)
ival-sub: 1.0ms (1.3% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch99.0ms (0.5%)

Memory
-1.2MiB live, 156.5MiB allocated
Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
31.0ms
204030.82161481804
850566.4884785833
63.0ms
-8.692296641184159e+43
-2.5683378186324213e+36
Samples
84.0ms240×0valid
Compiler

Compiled 761 to 571 computations (25% saved)

Precisions
Click to see histograms. Total time spent on operations: 72.0ms
ival-cos: 33.0ms (45.6% of total)
ival-sin: 21.0ms (29% of total)
ival-mult: 9.0ms (12.4% of total)
ival-asin: 4.0ms (5.5% of total)
ival-add: 2.0ms (2.8% of total)
ival-atan2: 2.0ms (2.8% of total)
ival-sub: 1.0ms (1.4% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch53.0ms (0.3%)

Memory
15.7MiB live, 94.8MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
50.0ms
-193442296926.22247
-62455.126971041784
Samples
44.0ms144×0valid
Compiler

Compiled 419 to 319 computations (23.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 39.0ms
ival-cos: 14.0ms (36.1% of total)
ival-sin: 13.0ms (33.5% of total)
ival-mult: 5.0ms (12.9% of total)
ival-asin: 2.0ms (5.2% of total)
ival-add: 1.0ms (2.6% of total)
ival-atan2: 1.0ms (2.6% of total)
ival-sub: 1.0ms (2.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

bsearch28.0ms (0.1%)

Memory
-9.9MiB live, 67.8MiB allocated
Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
26.0ms
1.3507325216016478e-73
1.6525273851441391e-72
Samples
23.0ms96×0valid
Compiler

Compiled 191 to 145 computations (24.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-sin: 6.0ms (31.3% of total)
ival-cos: 6.0ms (31.3% of total)
ival-mult: 3.0ms (15.6% of total)
ival-sub: 2.0ms (10.4% of total)
ival-add: 1.0ms (5.2% of total)
ival-asin: 1.0ms (5.2% of total)
ival-atan2: 1.0ms (5.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

simplify21.0ms (0.1%)

Memory
12.8MiB live, 52.2MiB allocated
Algorithm
1×egg-herbie
Rules
72×+-commutative_binary64
70×*-commutative_binary64
38×sub-neg_binary64
26×neg-sub0_binary64
26×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0107403
1182403
2220403
3250403
4272403
5281403
6285403
7286403
Stop Event
1×saturated
Calls
Call 1
Inputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(if (<=.f64 delta #s(literal -8070450532247929/144115188075855872 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 delta #s(literal 2434970217729661/73786976294838206464 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)) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -2102928824402889/73786976294838206464 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 delta #s(literal 5902958103587057/18446744073709551616 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))))
(if (<=.f64 phi1 #s(literal -2999999999999999979687959532377473024 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (if (<=.f64 phi1 #s(literal 350000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(if (<=.f64 delta #s(literal -3200000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(if (<=.f64 delta #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))
lambda1
Outputs
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (sin.f64 delta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 delta)) (sin.f64 theta)) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) (*.f64 (cos.f64 phi1) (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (cos.f64 theta)))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (*.f64 (cos.f64 phi1) (sin.f64 delta))))))
(+.f64 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 delta) (sin.f64 theta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 phi1) (sin.f64 delta)))) lambda1)
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (*.f64 (cos.f64 delta) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 delta) (sin.f64 phi1)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (-.f64 (cos.f64 delta) (pow.f64 (sin.f64 phi1) #s(literal 2 binary64)))))
(if (<=.f64 delta #s(literal -8070450532247929/144115188075855872 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 delta #s(literal 2434970217729661/73786976294838206464 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)) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -8070450532247929/144115188075855872 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta))) (if (<=.f64 delta #s(literal 2434970217729661/73786976294838206464 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (pow.f64 (cos.f64 phi1) #s(literal 2 binary64)))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -2102928824402889/73786976294838206464 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta))) (if (<=.f64 delta #s(literal 5902958103587057/18446744073709551616 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (cos.f64 phi1) (sin.f64 theta)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) (cos.f64 delta)))))
(if (<=.f64 delta #s(literal -2102928824402889/73786976294838206464 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta))) (if (<=.f64 delta #s(literal 5902958103587057/18446744073709551616 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (cos.f64 phi1)) (*.f64 delta (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/6 binary64) (*.f64 delta delta))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) (cos.f64 delta)))))
(if (<=.f64 phi1 #s(literal -2999999999999999979687959532377473024 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (if (<=.f64 phi1 #s(literal 350000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1))) (*.f64 (sin.f64 delta) (sin.f64 theta))) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(if (<=.f64 phi1 #s(literal -2999999999999999979687959532377473024 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))) (if (<=.f64 phi1 #s(literal 350000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 phi1)))) (cos.f64 delta))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64)))))))))
(if (<=.f64 delta #s(literal -3200000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) delta) (cos.f64 phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(if (<=.f64 delta #s(literal -3200000000 binary64)) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64))) (+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) delta)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 phi1 #s(literal 2 binary64))))))))
(+.f64 lambda1 (atan2.f64 (*.f64 (*.f64 (sin.f64 theta) (sin.f64 delta)) (cos.f64 phi1)) #s(literal 1 binary64)))
(+.f64 lambda1 (atan2.f64 (*.f64 (cos.f64 phi1) (*.f64 (sin.f64 theta) (sin.f64 delta))) #s(literal 1 binary64)))
(if (<=.f64 delta #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 delta (sin.f64 theta)) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))
(if (<=.f64 delta #s(literal 130547349557569/124330809102446660538845562036705210025114037699336929360115994223289874253133343883264 binary64)) lambda1 (+.f64 lambda1 (atan2.f64 (*.f64 (sin.f64 theta) delta) (-.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))))
lambda1

soundness1.7s (8.6%)

Memory
-0.1MiB live, 1 476.8MiB allocated
Rules
18 372×accelerator-lowering-fma.f32
18 372×accelerator-lowering-fma.f64
17 078×accelerator-lowering-fma.f32
17 078×accelerator-lowering-fma.f64
10 216×accelerator-lowering-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
058390
1319388
22674370
09986361
046301
1248301
21926269
08424269
055365
1331336
23008336
08659327
02405237
18335126
229515083
353375038
475685038
084754804
063816157
1219515565
2485815522
3683815522
0801914874
022125
1101125
2827125
08718120
043512756
1147512428
2499312298
0818411831
069115162
1235614449
2531614404
0835013836
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
Compiler

Compiled 1 231 to 654 computations (46.9% saved)

preprocess136.0ms (0.7%)

Memory
-6.0MiB live, 186.5MiB allocated
Remove

(abs phi2)

Compiler

Compiled 1 534 to 606 computations (60.5% saved)

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...