Equirectangular approximation to distance on a great circle
Time bar (total: 21.9s)
| 1× | search |
| Probability | Valid | Unknown | Precondition | Infinite | Domain | Can't | Iter |
|---|---|---|---|---|---|---|---|
| 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 |
| 3.1% | 3.1% | 96.6% | 0.2% | 0% | 0% | 0% | 10 |
| 15.6% | 15.6% | 84.2% | 0.2% | 0% | 0% | 0% | 11 |
| 15.6% | 15.6% | 84.2% | 0.2% | 0% | 0% | 0% | 12 |
Compiled 38 to 18 computations (52.6% saved)
ival-mult: 155.0ms (40.6% of total)ival-sub: 94.0ms (24.6% of total)ival-div: 36.0ms (9.4% of total)ival-add: 33.0ms (8.6% of total)ival-cos: 33.0ms (8.6% of total)ival-sqrt: 24.0ms (6.3% of total)const: 4.0ms (1% of total)backward-pass: 2.0ms (0.5% of total)| 891.0ms | 6147× | 0 | valid |
| 849.0ms | 2109× | 1 | valid |
ival-mult: 386.0ms (33.3% of total)ival-cos: 209.0ms (18% of total)ival-sub: 161.0ms (13.9% of total)ival-div: 117.0ms (10.1% of total)ival-add: 111.0ms (9.6% of total)ival-sqrt: 93.0ms (8% of total)backward-pass: 70.0ms (6% of total)const: 13.0ms (1.1% of total)| 2× | egg-herbie |
| 2004× | sum3-define |
| 1996× | +-lowering-+.f64 |
| 1996× | +-lowering-+.f32 |
| 1890× | --lowering--.f32 |
| 1890× | --lowering--.f64 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 150 | 349 |
| 1 | 382 | 347 |
| 2 | 909 | 343 |
| 3 | 4376 | 341 |
| 0 | 17 | 16 |
| 1 | 33 | 16 |
| 2 | 71 | 16 |
| 3 | 270 | 16 |
| 4 | 1290 | 16 |
| 5 | 4270 | 16 |
| 0 | 8110 | 16 |
| 1× | iter limit |
| 1× | node limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
| Outputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| Inputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2))))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2)))))) |
(neg (* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))) |
(neg (* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))) |
(neg (* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))) |
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2)))))) |
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2))))))) |
(* lambda1 (sqrt (+ (* (* (- R lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- R lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* lambda2 (sqrt (+ (* (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* phi1 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2)))) (* (- R phi2) (- R phi2))))) |
(* phi2 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2)))) (* (- phi1 R) (- phi1 R))))) |
(* R (sqrt (+ (* (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2))) (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (sqrt (+ (* (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2))) (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2)))) (* (- lambda1 phi2) (- lambda1 phi2))))) |
(* R (sqrt (+ (* (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2))) (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2)))) (* (- phi1 lambda1) (- phi1 lambda1))))) |
(* R (sqrt (+ (* (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2))) (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2)))) (* (- lambda2 phi2) (- lambda2 phi2))))) |
(* R (sqrt (+ (* (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2))) (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2)))) (* (- phi1 lambda2) (- phi1 lambda2))))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2)))) (* (- phi2 phi1) (- phi2 phi1))))) |
| Outputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2))) |
(* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2)) (neg R)) |
(* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2)))) |
(* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2)))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2))))) |
(* R (hypot (* (- lambda1 lambda2) (cos (/ (- phi2 phi1) 2))) (+ phi1 phi2))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2)))))) |
(* R (hypot (* (- lambda1 lambda2) (cos (/ (- phi1 phi2) 2))) (+ phi1 phi2))) |
(neg (* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))) |
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2))) |
(neg (* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))) |
(* (neg R) (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2)))) |
(neg (* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))) |
(* (neg R) (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2)))) |
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2)))))) |
(* (neg R) (hypot (* (- lambda1 lambda2) (cos (/ (- phi2 phi1) 2))) (+ phi1 phi2))) |
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2))))))) |
(* (neg R) (hypot (* (- lambda1 lambda2) (cos (/ (- phi1 phi2) 2))) (+ phi1 phi2))) |
(* lambda1 (sqrt (+ (* (* (- R lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- R lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* lambda1 (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (- R lambda2)))) |
(* lambda2 (sqrt (+ (* (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* lambda2 (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (- lambda1 R)))) |
(* phi1 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2)))) (* (- R phi2) (- R phi2))))) |
(* phi1 (hypot (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2))) (- R phi2))) |
(* phi2 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2)))) (* (- phi1 R) (- phi1 R))))) |
(* phi2 (hypot (* (- lambda1 lambda2) (cos (/ (+ R phi1) 2))) (- phi1 R))) |
(* R (sqrt (+ (* (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2))) (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2))) |
(* R (sqrt (+ (* (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2))) (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2)))) (* (- lambda1 phi2) (- lambda1 phi2))))) |
(* R (hypot (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2))) (- lambda1 phi2))) |
(* R (sqrt (+ (* (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2))) (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2)))) (* (- phi1 lambda1) (- phi1 lambda1))))) |
(* R (hypot (* (- phi2 lambda2) (cos (/ (+ lambda1 phi1) 2))) (- phi1 lambda1))) |
(* R (sqrt (+ (* (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2))) (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2)))) (* (- lambda2 phi2) (- lambda2 phi2))))) |
(* R (hypot (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2))) (- lambda2 phi2))) |
(* R (sqrt (+ (* (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2))) (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2)))) (* (- phi1 lambda2) (- phi1 lambda2))))) |
(* R (hypot (- phi1 lambda2) (* (- lambda1 phi2) (cos (/ (+ lambda2 phi1) 2))))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2)))) (* (- phi2 phi1) (- phi2 phi1))))) |
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2))) |
(negabs R)
(sort lambda1 lambda2)
(sort phi1 phi2)
| Ground Truth | Overpredictions | Example | Underpredictions | Example | Subexpression |
|---|---|---|---|---|---|
| 192 | 0 | - | 1 | (4.3743636858827714e-92 -5.544522729807066e-195 1.195703233784354e-277 -5.5516445475190533e-160 1.880539900131977e-253) | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 70 | 120 | (287.5287702174655 3.869171901358157e-128 3.296397374742452e+277 -6.153341649871389e+169 -1.6607707113130136e-108) | 0 | - | (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
| 0 | 0 | - | 0 | - | (-.f64 phi1 phi2) |
| 0 | 0 | - | 0 | - | (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) |
| 0 | 0 | - | 0 | - | (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
| 0 | 0 | - | 0 | - | #s(literal 2 binary64) |
| 0 | 0 | - | 0 | - | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 0 | 0 | - | 0 | - | phi1 |
| 0 | 0 | - | 0 | - | lambda1 |
| 0 | 0 | - | 0 | - | (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) |
| 0 | 0 | - | 0 | - | R |
| 0 | 0 | - | 0 | - | (-.f64 lambda1 lambda2) |
| 0 | 0 | - | 0 | - | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 0 | 0 | - | 0 | - | phi2 |
| 0 | 0 | - | 0 | - | (+.f64 phi1 phi2) |
| 0 | 0 | - | 0 | - | lambda2 |
| 0 | 0 | - | 0 | - | (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
| 216.0ms | 352× | 1 | valid |
| 58.0ms | 160× | 0 | valid |
Compiled 359 to 53 computations (85.2% saved)
ival-mult: 24.0ms (25.7% of total)ival-cos: 19.0ms (20.3% of total)backward-pass: 14.0ms (15% of total)ival-sub: 11.0ms (11.8% of total)ival-div: 9.0ms (9.6% of total)ival-add: 8.0ms (8.6% of total)ival-sqrt: 7.0ms (7.5% of total)const: 1.0ms (1.1% of total)Compiled 21 to 14 computations (33.3% saved)
| Status | Accuracy | Program |
|---|---|---|
| ▶ | 94.4% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
Compiled 21 to 14 computations (33.3% saved)
| 1× | egg-herbie |
Found 4 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (-.f64 lambda1 lambda2) |
| ✓ | cost-diff | 0 | (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
| ✓ | cost-diff | 0 | (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| 1996× | +-lowering-+.f64 |
| 1996× | +-lowering-+.f32 |
| 1890× | --lowering--.f32 |
| 1890× | --lowering--.f64 |
| 1482× | unsub-neg |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 17 | 66 |
| 1 | 33 | 66 |
| 2 | 71 | 66 |
| 3 | 270 | 66 |
| 4 | 1290 | 66 |
| 5 | 4270 | 66 |
| 0 | 8110 | 66 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(cos (/ (+ phi1 phi2) 2)) |
(/ (+ phi1 phi2) 2) |
(+ phi1 phi2) |
phi1 |
phi2 |
2 |
(- phi1 phi2) |
| Outputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) |
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(cos (/ (+ phi1 phi2) 2)) |
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(/ (+ phi1 phi2) 2) |
(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi1 |
phi2 |
2 |
#s(literal 2 binary64) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
Found 4 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 100.0% | (+.f64 phi1 phi2) |
| ✓ | accuracy | 99.9% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| ✓ | accuracy | 99.7% | (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
| ✓ | accuracy | 76.5% | (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
| 128.0ms | 180× | 1 | valid |
| 36.0ms | 76× | 0 | valid |
Compiled 72 to 15 computations (79.2% saved)
ival-sub: 35.0ms (38.9% of total)compiled-spec: 15.0ms (16.7% of total)ival-mult: 13.0ms (14.5% of total)ival-cos: 9.0ms (10% of total)backward-pass: 8.0ms (8.9% of total)ival-add: 4.0ms (4.4% of total)ival-div: 3.0ms (3.3% of total)ival-sqrt: 3.0ms (3.3% of total)const: 0.0ms (0% of total)| Inputs |
|---|
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))> |
#<alt (- lambda1 lambda2)> |
#<alt (cos (/ (+ phi1 phi2) 2))> |
#<alt (+ phi1 phi2)> |
| Outputs |
|---|
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt (* R phi1)> |
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))> |
#<alt (* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))> |
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))> |
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))> |
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (* -1 phi1)> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* -1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt lambda1> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt lambda1> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt lambda1> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (* -1 lambda2)> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* -1 lambda2)> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt phi2> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt phi1> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt phi1> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt phi2> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
57 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 19.0ms | lambda2 | @ | 0 | (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 4.0ms | phi1 | @ | 0 | (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 3.0ms | R | @ | 0 | (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 3.0ms | lambda2 | @ | -inf | (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) |
| 2.0ms | phi2 | @ | 0 | (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 1× | batch-egg-rewrite |
| 2952× | +-lowering-+.f64 |
| 2952× | +-lowering-+.f32 |
| 2618× | *-lowering-*.f32 |
| 2618× | *-lowering-*.f64 |
| 1530× | fma-lowering-fma.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 17 | 52 |
| 1 | 46 | 52 |
| 2 | 124 | 52 |
| 3 | 476 | 52 |
| 4 | 2618 | 52 |
| 0 | 8929 | 52 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) |
(- lambda1 lambda2) |
(cos (/ (+ phi1 phi2) 2)) |
(+ phi1 phi2) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) |
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(sqrt.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
(pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi1 phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(+.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))))) |
(+.f64 (*.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))) (-.f64 lambda1 lambda2))) |
(exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 lambda2 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(fma.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 lambda2 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 lambda2 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(fma.f64 (*.f64 lambda2 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda2 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(neg.f64 (*.f64 (-.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)) |
(+.f64 (-.f64 lambda1 lambda2) #s(literal 0 binary64)) |
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1) |
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) (neg.f64 (-.f64 #s(literal 0 binary64) lambda1))) |
(+.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) |
(exp.f64 (log.f64 (-.f64 lambda1 lambda2))) |
(-.f64 lambda1 lambda2) |
(-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1)) |
(fma.f64 lambda2 #s(literal -1 binary64) lambda1) |
(fma.f64 #s(literal -1 binary64) lambda2 lambda1) |
(neg.f64 (-.f64 lambda2 lambda1)) |
(*.f64 #s(literal -1 binary64) (-.f64 lambda2 lambda1)) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (neg.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))))) |
(+.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal -2 binary64))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal -2 binary64))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(exp.f64 (log.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal -2 binary64))) (cos.f64 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal -2 binary64))) (sin.f64 (/.f64 phi1 #s(literal -2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal -2 binary64))))) |
(fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 #s(literal 0 binary64) (sin.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 phi1 phi2) |
(+.f64 phi2 phi1) |
(+.f64 (+.f64 phi1 phi2) #s(literal 0 binary64)) |
(+.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(+.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) |
(+.f64 (/.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2)))) |
(+.f64 (/.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2))))) |
(+.f64 (/.f64 phi2 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1 binary64))) |
(+.f64 (/.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2)))) |
(+.f64 (/.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2))))) |
(+.f64 (/.f64 phi1 #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2))) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(+.f64 (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2))) (/.f64 phi1 #s(literal 2 binary64))) |
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2))) (/.f64 phi2 #s(literal 2 binary64))) |
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 phi2 #s(literal -2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 phi1 #s(literal -2 binary64)))) |
(+.f64 (*.f64 #s(literal -2 binary64) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 phi2 #s(literal -2 binary64)))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2)))) (/.f64 phi2 #s(literal 2 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2)))) (/.f64 phi1 #s(literal 2 binary64))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64)))) |
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64)))) |
(+.f64 (*.f64 (/.f64 phi2 #s(literal -2 binary64)) #s(literal -2 binary64)) (*.f64 (/.f64 phi1 #s(literal -2 binary64)) #s(literal -2 binary64))) |
(+.f64 (*.f64 (/.f64 phi1 #s(literal -2 binary64)) #s(literal -2 binary64)) (*.f64 (/.f64 phi2 #s(literal -2 binary64)) #s(literal -2 binary64))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2))) #s(literal 1 binary64)) (/.f64 phi2 #s(literal 2 binary64))) |
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2))) #s(literal 1 binary64)) (/.f64 phi1 #s(literal 2 binary64))) |
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))) #s(literal 1 binary64))) |
(+.f64 (*.f64 (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) |
(+.f64 (*.f64 (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2)))) (/.f64 phi1 #s(literal 2 binary64))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2)))) (/.f64 phi2 #s(literal 2 binary64))) |
(exp.f64 (log.f64 (+.f64 phi1 phi2))) |
(exp.f64 (*.f64 (log.f64 (+.f64 phi1 phi2)) #s(literal 1 binary64))) |
(-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)) |
(-.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)) |
(-.f64 (+.f64 phi1 phi2) #s(literal 0 binary64)) |
(-.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) |
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2))) |
(-.f64 (/.f64 phi1 #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 1 binary64))) |
(-.f64 (/.f64 phi2 #s(literal 1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64))) |
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1 binary64)) (/.f64 phi1 #s(literal -1 binary64))) |
(-.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1 binary64)) (/.f64 phi2 #s(literal -1 binary64))) |
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2)))) |
(fma.f64 phi1 #s(literal 1 binary64) phi2) |
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2)))) |
(fma.f64 phi2 #s(literal 1 binary64) phi1) |
(fma.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 (+.f64 phi1 phi2) #s(literal 1 binary64) #s(literal 0 binary64)) |
(fma.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 0 binary64)) |
(fma.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(fma.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 2 binary64) #s(literal 0 binary64)) |
(fma.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 1 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (+.f64 phi1 phi2)))) |
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (+.f64 phi1 phi2)))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 0 binary64)) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal -1 binary64) #s(literal 0 binary64)) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal -1/2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 0 binary64)) |
(fma.f64 #s(literal 1 binary64) phi1 phi2) |
(fma.f64 #s(literal 1 binary64) phi2 phi1) |
(fma.f64 #s(literal 1 binary64) (+.f64 phi1 phi2) #s(literal 0 binary64)) |
(fma.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1 binary64) phi1) |
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal 0 binary64)) |
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) phi2) phi1) |
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) phi1) phi2) |
(fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 0 binary64)) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1 binary64) phi2) |
(fma.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal -2 binary64) #s(literal 0 binary64)) |
(fma.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal -1 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(fma.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(fma.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(fma.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 1/2 binary64) #s(literal 0 binary64)) |
(fma.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal -1/2 binary64) #s(literal 0 binary64)) |
(neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2))) |
(/.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)) |
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) |
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal -1 binary64)) |
(/.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) #s(literal 2 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) #s(literal -2 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)) (+.f64 (/.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) #s(literal 1/2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))) (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)) (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))) (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)) (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))))) |
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))) |
(/.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) |
(/.f64 (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))) |
(/.f64 (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))) (/.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) |
(/.f64 (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)))) |
(/.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)))) |
(/.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)))) |
(/.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) #s(literal 1/2 binary64)))) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -4 binary64)) |
(/.f64 (neg.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64))) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) |
(/.f64 (neg.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)))) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)))) |
(pow.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) #s(literal -1 binary64)) |
(*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)) |
(*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(*.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 2 binary64)) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 1 binary64))) |
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal -1 binary64)) |
(*.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) |
(*.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) |
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (pow.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 1 binary64))) |
(*.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal -2 binary64)) |
(*.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -1/4 binary64)) |
(*.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)))) |
(*.f64 (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))))) |
(*.f64 (+.f64 (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal -1 binary64) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)))) |
(*.f64 (+.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/4 binary64)) |
(*.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(*.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(*.f64 (+.f64 (/.f64 (+.f64 phi1 phi2) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2)))) |
(*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(*.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64))))) |
(*.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (+.f64 phi1 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) |
(*.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal -1/2 binary64)) |
(*.f64 (pow.f64 (*.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)) #s(literal 1 binary64)) #s(literal -1/2 binary64)) |
(*.f64 (pow.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)) #s(literal 1 binary64)) #s(literal 1/2 binary64)) |
| 1× | egg-herbie |
| 7228× | *-lowering-*.f32 |
| 7228× | *-lowering-*.f64 |
| 3980× | +-lowering-+.f64 |
| 3980× | +-lowering-+.f32 |
| 1840× | fma-lowering-fma.f32 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 755 | 7056 |
| 1 | 2651 | 5842 |
| 0 | 8425 | 5842 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(* R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))) |
(* -1 (* R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda2 (cos (* 1/2 (+ phi1 phi2)))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(* -1 phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* -1 lambda2) |
(- lambda1 lambda2) |
(- lambda1 lambda2) |
(- lambda1 lambda2) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
lambda1 |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
lambda1 |
(+ lambda1 (* -1 lambda2)) |
(+ lambda1 (* -1 lambda2)) |
(+ lambda1 (* -1 lambda2)) |
(* -1 lambda2) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* -1 lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
phi2 |
(+ phi1 phi2) |
(+ phi1 phi2) |
(+ phi1 phi2) |
phi1 |
(* phi1 (+ 1 (/ phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
phi1 |
(+ phi1 phi2) |
(+ phi1 phi2) |
(+ phi1 phi2) |
phi2 |
(* phi2 (+ 1 (/ phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
phi2 |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
| Outputs |
|---|
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda1)) (*.f64 R (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 R))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (+.f64 (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) lambda1)) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))))) |
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 lambda1 (+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(*.f64 lambda1 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 R)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R)) (*.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) lambda1)) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda1)) lambda1)) (neg.f64 lambda1)) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 R))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 R))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (+.f64 (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) lambda2)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 R)))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 lambda2 (+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R)) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)))) |
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 R phi1)) #s(literal 1/2 binary64)))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) phi1))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 phi1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))) (*.f64 R phi1)) (*.f64 R (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))))) phi1))))) |
(* R phi1) |
(*.f64 R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 R #s(literal 1/2 binary64))) (*.f64 phi1 phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (/.f64 (*.f64 R phi2) phi1)))) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1)) phi1))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)))) phi1)) phi1))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi2) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 phi2 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (+.f64 (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 R (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2))))) |
(* R phi2) |
(*.f64 R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 R (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 R #s(literal 1/2 binary64))) (*.f64 phi2 phi2)) (/.f64 (*.f64 R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (/.f64 phi1 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) (/.f64 (*.f64 R phi1) phi2)))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)))) phi2)) phi2))) |
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))) (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64))))))))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(*.f64 lambda1 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 lambda2 (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) |
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda1)) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (neg.f64 lambda1)) |
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))) (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)))))))))) |
(* lambda2 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2))))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 lambda1 (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) #s(literal 1/2 binary64)))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) phi1))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (*.f64 phi1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))))) phi1))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)) #s(literal 1/2 binary64))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) |
(* -1 phi1) |
(-.f64 #s(literal 0 binary64) phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(*.f64 phi1 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)) phi1))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 phi2 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) phi2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 phi2 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1/2 binary64))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi1 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1)) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1)) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) phi1))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 phi1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))))))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 #s(literal 1/48 binary64)))))))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)))))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2)))))))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
lambda1 |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(*.f64 lambda1 (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) #s(literal -1 binary64))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(*.f64 lambda1 (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) #s(literal -1 binary64))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(*.f64 lambda1 (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) #s(literal -1 binary64))) |
lambda1 |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
phi2 |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi1 |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(*.f64 phi1 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(*.f64 phi1 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(*.f64 phi1 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
phi1 |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi2 |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
phi2 |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 phi2 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 phi2 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 phi2 (*.f64 #s(literal -1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))) |
Compiled 14350 to 2200 computations (84.7% saved)
29 alts after pruning (29 fresh and 0 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 435 | 29 | 464 |
| Fresh | 0 | 0 | 0 |
| Picked | 1 | 0 | 1 |
| Done | 0 | 0 | 0 |
| Total | 436 | 29 | 465 |
| Status | Accuracy | Program |
|---|---|---|
| 22.0% | (-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) | |
| 54.0% | (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) | |
| 29.8% | (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) | |
| 36.4% | (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) | |
| 17.6% | (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) | |
| 11.4% | (*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| ▶ | 19.4% | (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
| 9.7% | (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) | |
| 54.9% | (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) | |
| 35.5% | (*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) | |
| 17.2% | (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) | |
| 81.8% | (*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) | |
| ▶ | 99.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
| 99.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) | |
| ▶ | 80.5% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
| 69.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) | |
| 68.9% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) | |
| 81.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) | |
| 71.6% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) | |
| ▶ | 93.0% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| 50.1% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 41.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 88.0% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 89.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 11.4% | (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) | |
| 22.0% | (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) | |
| 19.4% | (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) | |
| 50.7% | (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) | |
| ▶ | 31.8% | (*.f64 R phi2) |
Compiled 1378 to 868 computations (37% saved)
| 1× | egg-herbie |
Found 17 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (-.f64 lambda1 lambda2) |
| ✓ | cost-diff | 0 | (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) |
| ✓ | cost-diff | 0 | (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
| ✓ | cost-diff | 0 | (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) |
| ✓ | cost-diff | 0 | (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| ✓ | cost-diff | 256 | (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) |
| ✓ | cost-diff | 0 | (+.f64 phi1 phi2) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
| ✓ | cost-diff | 0 | (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
| ✓ | cost-diff | 0 | (*.f64 R phi2) |
| ✓ | cost-diff | 0 | (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
| ✓ | cost-diff | 0 | (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
| ✓ | cost-diff | 6400 | (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
| 4348× | *-lowering-*.f32 |
| 4348× | *-lowering-*.f64 |
| 1894× | +-lowering-+.f64 |
| 1894× | +-lowering-+.f32 |
| 1484× | neg-lowering-neg.f64 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 52 | 377 |
| 1 | 135 | 363 |
| 2 | 424 | 363 |
| 3 | 2217 | 363 |
| 4 | 5526 | 363 |
| 0 | 8445 | 363 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))) |
(cos (/ phi2 2)) |
(/ phi2 2) |
phi2 |
2 |
(cos (/ phi1 2)) |
(/ phi1 2) |
phi1 |
(neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))) |
(* (sin (/ phi2 2)) (sin (/ phi1 2))) |
(sin (/ phi2 2)) |
(sin (/ phi1 2)) |
(- phi1 phi2) |
(* R phi2) |
R |
phi2 |
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2)) |
(cos (* 1/2 (+ phi1 phi2))) |
(* 1/2 (+ phi1 phi2)) |
1/2 |
(+ phi1 phi2) |
phi1 |
phi2 |
(* R lambda2) |
R |
lambda2 |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)) |
(/ (/ 2 (/ 2 (+ phi1 phi2))) 2) |
(/ 2 (/ 2 (+ phi1 phi2))) |
2 |
(/ 2 (+ phi1 phi2)) |
(+ phi1 phi2) |
phi1 |
phi2 |
(- phi1 phi2) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))) |
(cos (* 1/2 phi2)) |
(* 1/2 phi2) |
1/2 |
phi2 |
(* (sin (* 1/2 phi2)) (* phi1 -1/2)) |
(sin (* 1/2 phi2)) |
(* phi1 -1/2) |
phi1 |
-1/2 |
(- phi1 phi2) |
| Outputs |
|---|
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2)) |
(* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(cos (/ phi2 2)) |
(cos.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(/ phi2 2) |
(/.f64 phi2 #s(literal 2 binary64)) |
phi2 |
2 |
#s(literal 2 binary64) |
(cos (/ phi1 2)) |
(cos.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(/ phi1 2) |
(/.f64 phi1 #s(literal 2 binary64)) |
phi1 |
(neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(* (sin (/ phi2 2)) (sin (/ phi1 2))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(sin (/ phi2 2)) |
(sin.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(sin (/ phi1 2)) |
(sin.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
(* R phi2) |
(*.f64 R phi2) |
R |
phi2 |
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2)) |
(*.f64 (*.f64 R lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(* 1/2 (+ phi1 phi2)) |
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) |
1/2 |
#s(literal 1/2 binary64) |
(+ phi1 phi2) |
(+.f64 phi2 phi1) |
phi1 |
phi2 |
(* R lambda2) |
(*.f64 R lambda2) |
R |
lambda2 |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) |
(* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(/ (/ 2 (/ 2 (+ phi1 phi2))) 2) |
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) |
(/ 2 (/ 2 (+ phi1 phi2))) |
(+.f64 phi2 phi1) |
2 |
#s(literal 2 binary64) |
(/ 2 (+ phi1 phi2)) |
(/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) |
(+ phi1 phi2) |
(+.f64 phi2 phi1) |
phi1 |
phi2 |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 phi1 #s(literal -1/2 binary64))))))) |
R |
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 phi1 #s(literal -1/2 binary64)))))) |
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) |
(*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 phi1 #s(literal -1/2 binary64))))) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))) |
(+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 phi1 #s(literal -1/2 binary64)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(* 1/2 phi2) |
(/.f64 phi2 #s(literal 2 binary64)) |
1/2 |
#s(literal 1/2 binary64) |
phi2 |
(* (sin (* 1/2 phi2)) (* phi1 -1/2)) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 phi1 #s(literal -1/2 binary64))) |
(sin (* 1/2 phi2)) |
(sin.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(* phi1 -1/2) |
(*.f64 phi1 #s(literal -1/2 binary64)) |
phi1 |
-1/2 |
#s(literal -1/2 binary64) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
Found 17 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 100.0% | (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64)))) |
| ✓ | accuracy | 99.8% | (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))) |
| ✓ | accuracy | 99.8% | (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) |
| ✓ | accuracy | 92.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
| ✓ | accuracy | 99.9% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| ✓ | accuracy | 99.7% | (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) |
| ✓ | accuracy | 99.7% | (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) |
| ✓ | accuracy | 76.5% | (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) |
| ✓ | accuracy | 100.0% | (*.f64 R lambda2) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
| ✓ | accuracy | 99.7% | (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
| ✓ | accuracy | 76.5% | (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
| ✓ | accuracy | 100.0% | (*.f64 R phi2) |
| ✓ | accuracy | 99.9% | (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
| ✓ | accuracy | 99.9% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
| ✓ | accuracy | 99.7% | (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
| ✓ | accuracy | 99.7% | (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
| 803.0ms | 188× | 1 | valid |
| 58.0ms | 67× | 0 | valid |
| 24.0ms | 1× | 3 | valid |
Compiled 401 to 45 computations (88.8% saved)
ival-mult: 99.0ms (23.2% of total)compiled-spec: 77.0ms (18% of total)ival-cos: 64.0ms (15% of total)ival-div: 61.0ms (14.3% of total)ival-sin: 47.0ms (11% of total)backward-pass: 27.0ms (6.3% of total)ival-add: 18.0ms (4.2% of total)ival-neg: 17.0ms (4% of total)ival-sqrt: 10.0ms (2.3% of total)ival-sub: 6.0ms (1.4% of total)const: 1.0ms (0.2% of total)| Inputs |
|---|
#<alt (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))> |
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))> |
#<alt (* R phi2)> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (* 1/2 (+ phi1 phi2))> |
#<alt (+ phi1 phi2)> |
#<alt (/ 2 (/ 2 (+ phi1 phi2)))> |
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))> |
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))> |
#<alt (- lambda1 lambda2)> |
#<alt (* (sin (/ phi2 2)) (sin (/ phi1 2)))> |
#<alt (* R lambda2)> |
#<alt (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))> |
#<alt (* (sin (* 1/2 phi2)) (* phi1 -1/2))> |
#<alt (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))> |
| Outputs |
|---|
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt (* R phi1)> |
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))> |
#<alt (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2))) phi2))) phi2)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))))> |
#<alt (* -1 phi1)> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1)))))> |
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))> |
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))> |
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R phi2)> |
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (* 1/2 phi2)> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (* 1/2 phi1)> |
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))> |
#<alt (* 1/2 phi1)> |
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))> |
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))> |
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))> |
#<alt (* 1/2 phi1)> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (* 1/2 phi2)> |
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))> |
#<alt (* 1/2 phi2)> |
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))> |
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))> |
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))> |
#<alt phi2> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt phi1> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt phi1> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt phi2> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt phi2> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt (* phi1 (+ 1 (/ phi2 phi1)))> |
#<alt phi1> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))> |
#<alt phi1> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt (+ phi1 phi2)> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt (* phi2 (+ 1 (/ phi1 phi2)))> |
#<alt phi2> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt (* R phi1)> |
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))> |
#<alt (* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))> |
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))> |
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))> |
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (* -1 phi1)> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))> |
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))> |
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))> |
#<alt (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))> |
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/48 phi1) (* 1/16 phi1)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* -1/4 (* (* R (* phi1 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt (* (* R phi1) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))> |
#<alt (* phi1 (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))> |
#<alt (* phi1 (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (* phi1 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi1 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))> |
#<alt (* -1 (* (* R phi1) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* (/ (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* 1/2 (* (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))))> |
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))> |
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))> |
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/48 phi1) (* 1/16 phi1)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* -1/4 (* (* phi1 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))))> |
#<alt (* phi1 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))> |
#<alt (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))> |
#<alt (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))))> |
#<alt (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))))> |
#<alt (* -1 (* phi1 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))> |
#<alt (* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))))> |
#<alt (* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) phi1)))))> |
#<alt (* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) phi1) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi1)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) phi1)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (- lambda1 lambda2)> |
#<alt (- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)> |
#<alt (- (+ lambda1 (* phi2 (+ (* -1/4 (* phi1 (- lambda1 lambda2))) (* -1/8 (* phi2 (- lambda1 lambda2)))))) lambda2)> |
#<alt (- (+ lambda1 (* phi2 (+ (* -1/4 (* phi1 (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)))> |
#<alt (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))> |
#<alt (* -1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt lambda1> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt lambda1> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt lambda1> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (* -1 lambda2)> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* -1 lambda2)> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* 1/2 (* phi2 (sin (* 1/2 phi1))))> |
#<alt (* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))> |
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))> |
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* 1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))> |
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))> |
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (* R lambda2)> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (* -1/4 (* phi1 phi2))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2)))))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1)))))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2)))))))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt 1> |
#<alt (+ 1 (* -1/4 (* phi1 phi2)))> |
#<alt (+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2))))> |
#<alt (+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
201 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 18.0ms | phi1 | @ | -inf | (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
| 8.0ms | lambda1 | @ | 0 | (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) |
| 6.0ms | lambda2 | @ | -inf | (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) |
| 4.0ms | R | @ | 0 | (* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 3.0ms | lambda2 | @ | inf | (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2)))) |
| 1× | batch-egg-rewrite |
| 4594× | *-lowering-*.f32 |
| 4594× | *-lowering-*.f64 |
| 3384× | /-lowering-/.f32 |
| 3384× | /-lowering-/.f64 |
| 2554× | +-lowering-+.f64 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 52 | 336 |
| 1 | 183 | 215 |
| 2 | 862 | 215 |
| 0 | 8417 | 215 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) (* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2))))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (+ (* (cos (/ phi2 2)) (cos (/ phi1 2))) (neg (* (sin (/ phi2 2)) (sin (/ phi1 2)))))) |
(* R phi2) |
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2)) |
(cos (* 1/2 (+ phi1 phi2))) |
(* 1/2 (+ phi1 phi2)) |
(+ phi1 phi2) |
(/ 2 (/ 2 (+ phi1 phi2))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) (* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2))) |
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2)))) |
(- lambda1 lambda2) |
(* (sin (/ phi2 2)) (sin (/ phi1 2))) |
(* R lambda2) |
(cos (/ (/ 2 (/ 2 (+ phi1 phi2))) 2)) |
(* (sin (* 1/2 phi2)) (* phi1 -1/2)) |
(+ (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (* phi1 -1/2))) |
| Outputs |
|---|
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) |
(+.f64 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))))) |
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 4 binary64))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) |
(/.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) #s(literal -4 binary64)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) |
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) |
(hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2))) |
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
(pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 lambda1 lambda2))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) lambda1) (+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1)) |
(+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) lambda1) (+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(+.f64 (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) lambda1)) (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) lambda1)) (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) |
(*.f64 phi2 R) |
(*.f64 R phi2) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R lambda2)) (*.f64 (*.f64 R lambda2) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R lambda2)) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2))) |
(+.f64 (*.f64 (*.f64 R lambda2) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 R lambda2) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (*.f64 R lambda2) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 R lambda2)) (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 R lambda2))) |
(+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 R lambda2)) (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 R lambda2))) |
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 lambda2 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(*.f64 lambda2 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) R)) |
(*.f64 (*.f64 R lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) R) lambda2) |
(*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda2) R) |
(*.f64 (*.f64 lambda2 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) R) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) |
(+.f64 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))))) |
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 4 binary64))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) |
(/.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) #s(literal -4 binary64)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) |
(+.f64 (/.f64 phi2 #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64))) |
(+.f64 (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi2 #s(literal 2 binary64))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) phi1))) |
(+.f64 (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 1 binary64))) |
(+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) phi2))) |
(+.f64 (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 1 binary64))) |
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) |
(-.f64 (/.f64 phi2 #s(literal 2 binary64)) (/.f64 phi1 #s(literal -2 binary64))) |
(-.f64 (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi2 #s(literal -2 binary64))) |
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(fma.f64 phi2 #s(literal 1/2 binary64) (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 phi1 #s(literal 1/2 binary64) (/.f64 phi2 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) phi2 (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) phi1 (/.f64 phi2 #s(literal 2 binary64))) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1/2 binary64) (/.f64 phi2 #s(literal 2 binary64))) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1/2 binary64) (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1 binary64) (/.f64 phi2 #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1 binary64) (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi2 #s(literal 2 binary64))) |
(neg.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(neg.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal 1 binary64))) |
(neg.f64 (+.f64 (/.f64 phi2 #s(literal -2 binary64)) (/.f64 phi1 #s(literal -2 binary64)))) |
(neg.f64 (+.f64 (/.f64 phi1 #s(literal -2 binary64)) (/.f64 phi2 #s(literal -2 binary64)))) |
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1))) |
(/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))) |
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) |
(/.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (+.f64 phi2 phi1))) |
(/.f64 #s(literal -2 binary64) (/.f64 #s(literal -4 binary64) (+.f64 phi2 phi1))) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) #s(literal 1/2 binary64))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))) (+.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64))) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 (neg.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (/.f64 phi2 #s(literal 2 binary64))) (+.f64 (neg.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -2 binary64)) (+.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -1 binary64)) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 phi1 phi2)) (+.f64 (/.f64 #s(literal 2 binary64) phi2) (/.f64 #s(literal 2 binary64) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))) (+.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -2 binary64) (/.f64 phi1 #s(literal 2 binary64))) (+.f64 (neg.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal 2 binary64)) (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -2 binary64)) (+.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 4 binary64) (*.f64 phi2 phi1)) (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) |
(/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1 binary64)) |
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi2 phi1))) |
(/.f64 (+.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi2)) #s(literal -4 binary64)) |
(/.f64 (+.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(/.f64 (+.f64 (neg.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) phi2)) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 4 binary64)) |
(/.f64 (+.f64 (neg.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -2 binary64)) (/.f64 #s(literal -2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64))) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -1 binary64)) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -2 binary64))) |
(/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi2) (/.f64 #s(literal 2 binary64) phi1)) (/.f64 #s(literal 4 binary64) (*.f64 phi1 phi2))) |
(/.f64 (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1)) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi1)) #s(literal -4 binary64)) |
(/.f64 (+.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) phi1)) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi1)) #s(literal 4 binary64)) |
(/.f64 (+.f64 (neg.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -2 binary64)) (/.f64 #s(literal -2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1)) (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal 2 binary64))) |
(/.f64 (+.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1))) (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -2 binary64))) |
(/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 #s(literal 4 binary64) (*.f64 phi2 phi1))) |
(/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -1 binary64)) |
(/.f64 (+.f64 (*.f64 phi2 (/.f64 #s(literal -2 binary64) phi1)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) (/.f64 #s(literal -2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) phi1)) (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi2) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi2) phi1)) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal 2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi2) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal -2 binary64))) |
(/.f64 (+.f64 (/.f64 #s(literal -2 binary64) phi1) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi2) (/.f64 #s(literal 2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -2 binary64) phi1)) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi2) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 phi1 (/.f64 #s(literal -2 binary64) phi2)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 #s(literal -2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi1) phi2)) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal 2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi1) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal -2 binary64))) |
(/.f64 (+.f64 (/.f64 #s(literal -2 binary64) phi2) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2))) |
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal -2 binary64) phi2)) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi1) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (neg.f64 (+.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2))) #s(literal -4 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi2))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))) |
(/.f64 (neg.f64 (+.f64 (neg.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) phi2))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi2))) #s(literal -4 binary64)) |
(/.f64 (neg.f64 (+.f64 (neg.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -2 binary64))) (neg.f64 (/.f64 #s(literal -2 binary64) (/.f64 phi2 #s(literal 2 binary64))))) |
(/.f64 (neg.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) phi2))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (+.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -1 binary64)) phi2))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi2) (/.f64 #s(literal 2 binary64) phi1))) (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 phi1 phi2)))) |
(/.f64 (neg.f64 (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1))) #s(literal -4 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi1))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (/.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))))) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) phi1))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi1))) #s(literal -4 binary64)) |
(/.f64 (neg.f64 (+.f64 (neg.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -2 binary64))) (neg.f64 (/.f64 #s(literal -2 binary64) (/.f64 phi1 #s(literal 2 binary64))))) |
(/.f64 (neg.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal 2 binary64)))) |
(/.f64 (neg.f64 (+.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1)))) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -2 binary64)))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2))) (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 phi2 phi1)))) |
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal -1 binary64)) |
(pow.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1 binary64)) |
(*.f64 #s(literal 2 binary64) (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)) |
(*.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 phi2 phi1)))) |
(*.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1/2 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(*.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1 binary64)) |
(*.f64 #s(literal -1 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(*.f64 (+.f64 (*.f64 phi1 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/4 binary64)) |
(*.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi2)) #s(literal -1/4 binary64)) |
(*.f64 (+.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (+.f64 (neg.f64 (*.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal -2 binary64) phi2)) #s(literal -1/4 binary64)) |
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 1/4 binary64)) |
(*.f64 (+.f64 (neg.f64 (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) phi2)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal 2 binary64)))) |
(*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -1 binary64)) phi2)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -2 binary64)))) |
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi2) (/.f64 #s(literal 2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 phi1 phi2)))) |
(*.f64 (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) |
(*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) phi1)) #s(literal -1/4 binary64)) |
(*.f64 (+.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) phi1)) #s(literal -1/4 binary64)) |
(*.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) |
(*.f64 (+.f64 (neg.f64 (/.f64 phi2 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1)) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal 2 binary64)))) |
(*.f64 (+.f64 #s(literal -2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 2 binary64) phi2) phi1))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -2 binary64)))) |
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (*.f64 phi2 phi1)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) |
(+.f64 phi2 phi1) |
(+.f64 phi1 phi2) |
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(+.f64 (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1 binary64))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1 binary64))) |
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) |
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(fma.f64 phi2 #s(literal 1 binary64) phi1) |
(fma.f64 phi1 #s(literal 1 binary64) phi2) |
(fma.f64 #s(literal 1 binary64) phi2 phi1) |
(fma.f64 #s(literal 1 binary64) phi1 phi2) |
(neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(neg.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal 1 binary64))) |
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) |
(/.f64 (+.f64 phi2 phi1) #s(literal 1 binary64)) |
(/.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi2 phi1))) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))) |
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 phi2 phi1))) |
(pow.f64 (+.f64 phi2 phi1) #s(literal 1 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) #s(literal -1 binary64)) |
(*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) |
(*.f64 (+.f64 phi2 phi1) #s(literal 1 binary64)) |
(*.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(*.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) |
(*.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 2 binary64)) |
(*.f64 #s(literal -1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) |
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal -2 binary64) (+.f64 phi2 phi1)) #s(literal -1/2 binary64)) |
(+.f64 phi2 phi1) |
(+.f64 phi1 phi2) |
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64)))) |
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 phi1 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 phi2 #s(literal 2 binary64)))) |
(+.f64 (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (/.f64 phi1 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 2 binary64))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1 binary64))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1 binary64))) |
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) |
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(fma.f64 phi2 #s(literal 1 binary64) phi1) |
(fma.f64 phi1 #s(literal 1 binary64) phi2) |
(fma.f64 #s(literal 1 binary64) phi2 phi1) |
(fma.f64 #s(literal 1 binary64) phi1 phi2) |
(neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(neg.f64 (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal 1 binary64))) |
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) |
(/.f64 (+.f64 phi2 phi1) #s(literal 1 binary64)) |
(/.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) (+.f64 phi2 phi1))) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))) |
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 phi2 phi1))) |
(pow.f64 (+.f64 phi2 phi1) #s(literal 1 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) #s(literal -1 binary64)) |
(*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))) |
(*.f64 (+.f64 phi2 phi1) #s(literal 1 binary64)) |
(*.f64 #s(literal -2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(*.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) |
(*.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 2 binary64)) |
(*.f64 #s(literal -1 binary64) (-.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)) |
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) |
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal 1/2 binary64)) |
(*.f64 (*.f64 #s(literal -2 binary64) (+.f64 phi2 phi1)) #s(literal -1/2 binary64)) |
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))) |
(hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2))) |
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
(pow.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 lambda1 lambda2))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) lambda1) (+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1)) |
(+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) lambda1) (+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(+.f64 (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) lambda1)) (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) lambda1)) (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) (-.f64 phi1 phi2)) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 2 binary64)))) |
(pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) lambda1) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) lambda1) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) lambda1)) |
(+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) lambda1) (+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 lambda1 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) (*.f64 lambda1 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(+.f64 (*.f64 (*.f64 lambda1 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) lambda1)) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 lambda1 (/.f64 phi1 #s(literal -2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) |
(+.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (/.f64 phi1 #s(literal -2 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 lambda1 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 lambda1 lambda2) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) lambda1 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (/.f64 phi1 #s(literal -2 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 phi1 #s(literal -2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) phi1) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 lambda1 lambda2)) |
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)) |
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1) |
(-.f64 lambda1 lambda2) |
(-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1)) |
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2) |
(fma.f64 #s(literal -1 binary64) lambda2 lambda1) |
(+.f64 (/.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 2 binary64)))) |
(-.f64 (/.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 2 binary64))) |
(neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) |
(/.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -1 binary64)) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) |
(*.f64 R lambda2) |
(*.f64 lambda2 R) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) |
(+.f64 (fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(+.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) |
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(-.f64 #s(literal 0 binary64) (-.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))))) |
(-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 4 binary64))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal -1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) |
(/.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (+.f64 (neg.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) #s(literal -4 binary64)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64)))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 1/4 binary64)) |
(*.f64 phi1 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) |
(*.f64 (/.f64 phi1 #s(literal -2 binary64)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) phi1) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) phi1) |
(+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (/.f64 phi1 #s(literal -2 binary64)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) phi1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
| 1× | egg-herbie |
| 6388× | *-lowering-*.f32 |
| 6388× | *-lowering-*.f64 |
| 3418× | +-lowering-+.f64 |
| 3418× | +-lowering-+.f32 |
| 1338× | /-lowering-/.f32 |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1956 | 28328 |
| 1 | 5864 | 25938 |
| 0 | 8172 | 25938 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(* R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))) |
(* -1 (* R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1))))) |
(sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2))) phi2))) phi2))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))) |
(* -1 phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2))) |
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2))) |
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R phi2) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(* R (* lambda2 (cos (* 1/2 phi1)))) |
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(* 1/2 phi2) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(* 1/2 phi1) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(* 1/2 phi1) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(* 1/2 phi1) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(* 1/2 phi2) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(* 1/2 phi2) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
phi2 |
(+ phi1 phi2) |
(+ phi1 phi2) |
(+ phi1 phi2) |
phi1 |
(* phi1 (+ 1 (/ phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
phi1 |
(+ phi1 phi2) |
(+ phi1 phi2) |
(+ phi1 phi2) |
phi2 |
(* phi2 (+ 1 (/ phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
phi2 |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
phi2 |
(+ phi1 phi2) |
(+ phi1 phi2) |
(+ phi1 phi2) |
phi1 |
(* phi1 (+ 1 (/ phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
phi1 |
(+ phi1 phi2) |
(+ phi1 phi2) |
(+ phi1 phi2) |
phi2 |
(* phi2 (+ 1 (/ phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
phi2 |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(* R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))) |
(* -1 (* R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda2 (cos (* 1/2 (+ phi1 phi2)))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(* -1 phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))) |
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/48 phi1) (* 1/16 phi1)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* -1/4 (* (* R (* phi1 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(* (* R phi1) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) |
(* phi1 (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) |
(* phi1 (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(* phi1 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi1 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) |
(* -1 (* (* R phi1) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) |
(* -1 (* phi1 (+ (* -1/2 (* (/ (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(* -1 (* phi1 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(* -1 (* phi1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* 1/2 (* (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/48 phi1) (* 1/16 phi1)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* -1/4 (* (* phi1 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))) |
(* phi1 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) |
(* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) |
(* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))) |
(* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))))) |
(* -1 (* phi1 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) |
(* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))) |
(* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) phi1))))) |
(* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) phi1) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi1)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) phi1))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2))) |
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2))) |
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(- lambda1 lambda2) |
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2) |
(- (+ lambda1 (* phi2 (+ (* -1/4 (* phi1 (- lambda1 lambda2))) (* -1/8 (* phi2 (- lambda1 lambda2)))))) lambda2) |
(- (+ lambda1 (* phi2 (+ (* -1/4 (* phi1 (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1))) |
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1))) |
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1))) |
(* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) |
(* -1 lambda2) |
(- lambda1 lambda2) |
(- lambda1 lambda2) |
(- lambda1 lambda2) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
lambda1 |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
lambda1 |
(+ lambda1 (* -1 lambda2)) |
(+ lambda1 (* -1 lambda2)) |
(+ lambda1 (* -1 lambda2)) |
(* -1 lambda2) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* -1 lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* 1/2 (* phi2 (sin (* 1/2 phi1)))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1)))))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* 1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2)))))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(* R lambda2) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(* -1/4 (* phi1 phi2)) |
(* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2))))))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
1 |
(+ 1 (* -1/4 (* phi1 phi2))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2)))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
| Outputs |
|---|
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda1) (*.f64 lambda2 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 R (*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 lambda1 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 R (*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 lambda2 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi2) (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi2) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 R (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 R (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))))) |
(* R phi2) |
(*.f64 R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi2 phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi2)) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 R (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi2))) phi2)) phi2))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi1) (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi1) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 R (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi1) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 R (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))))) |
(* R phi1) |
(*.f64 R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi1 phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 R phi2) phi1))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi1)) phi1))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 R (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi1))) phi1)) phi1))) |
(sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (*.f64 lambda2 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (*.f64 lambda1 (*.f64 (*.f64 lambda2 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))))) (*.f64 lambda2 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 lambda1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 lambda1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi2)) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) phi2))) phi2)) phi2))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (/.f64 phi2 phi1)))) |
(* -1 phi1) |
(-.f64 #s(literal 0 binary64) phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi1)) phi1))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) phi1))) phi1)) phi1))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R phi2) |
(*.f64 R phi2) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 lambda2 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal -1/8 binary64) R) (*.f64 (*.f64 lambda2 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/48 binary64) R) (*.f64 (*.f64 lambda2 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 phi1)))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal -1/8 binary64) R) (*.f64 (*.f64 lambda2 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))) |
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal 1/48 binary64) R) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(* 1/2 phi1) |
(*.f64 #s(literal 1/2 binary64) phi1) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1))) |
(* 1/2 phi1) |
(*.f64 #s(literal 1/2 binary64) phi1) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))) |
(* 1/2 phi1) |
(*.f64 #s(literal 1/2 binary64) phi1) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(*.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2)))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(*.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2)))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(*.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2)))) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64))) |
phi2 |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi1 |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
phi1 |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi2 |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
phi2 |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64))) |
phi2 |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi1 |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (/ phi2 phi1))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))) |
phi1 |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
(+ phi1 phi2) |
(+.f64 phi1 phi2) |
phi2 |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (/ phi1 phi2))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
phi2 |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64))) |
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi1) phi2) #s(literal -1 binary64))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 R (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 R (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))) |
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi1) (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi1) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 R (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi1) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 R (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))))) |
(* R phi1) |
(*.f64 R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 R phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi2) (*.f64 phi1 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))) (*.f64 (/.f64 R phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) (/.f64 (*.f64 R phi2) phi1)))) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 R phi2) phi1))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))) phi1)) phi1))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi2) (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi2) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 R (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 R (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))))) |
(* R phi2) |
(*.f64 R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 R phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi1) (*.f64 phi2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (*.f64 (/.f64 R phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) (/.f64 (*.f64 R phi1) phi2)))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))) phi2)) phi2))) |
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(*.f64 lambda1 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) |
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1))) |
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1))) |
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))) |
(* lambda2 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))) |
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)) (*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) |
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))) |
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (/.f64 lambda1 lambda2) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))) |
(* -1 phi1) |
(-.f64 #s(literal 0 binary64) phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi1 (*.f64 phi2 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))) (/.f64 phi1 phi2)))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) phi2))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* lambda1 (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) |
(-.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))))) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 lambda1 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda1) (*.f64 (*.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 R (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))))) (*.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 lambda1 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))) |
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal -1/2 binary64) lambda1) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1))) |
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) |
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (*.f64 lambda2 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda1) (*.f64 (*.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (*.f64 (*.f64 R (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) (*.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 R lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 lambda2 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))) |
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* R (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2))) |
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) |
(+.f64 (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R phi2) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+.f64 (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 phi2 (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))) (*.f64 (*.f64 R (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/48 phi1) (* 1/16 phi1)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))))) |
(+.f64 (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 phi1 #s(literal 1/12 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (*.f64 R (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))))))) |
(* R phi2) |
(*.f64 R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) R) phi2) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi1) phi2) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 R (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 R phi1) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi1) (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R phi1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 R (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* -1/4 (* (* R (* phi1 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 R (*.f64 (*.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))))) |
(* (* R phi1) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) |
(*.f64 (*.f64 R phi1) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) |
(* phi1 (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(* phi1 (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 R (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 phi1 phi1)))))) |
(* phi1 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi1 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) |
(*.f64 phi1 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 R (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 phi1 phi1))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 R (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) (*.f64 phi1 (*.f64 phi1 phi1)))))) |
(* -1 (* (* R phi1) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) |
(* -1 (* phi1 (+ (* -1/2 (* (/ (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) phi1)))) |
(* -1 (* phi1 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* 1/2 (* (* R (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) phi1)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2))) (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) phi1)) phi1))) |
(sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))))) (*.f64 (*.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda1 lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (/.f64 lambda2 lambda1) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)))) |
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (neg.f64 lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)))) |
(sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) |
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 lambda1 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (- (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2)) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 lambda1 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))))))) |
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda2 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (+ (* -1/2 (* phi1 (sin (* 1/2 phi2)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))))))) |
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)))) |
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) |
(hypot.f64 phi1 (-.f64 lambda1 lambda2)) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) |
(+.f64 (hypot.f64 phi1 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+.f64 (hypot.f64 phi1 (-.f64 lambda1 lambda2)) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/48 phi1) (* 1/16 phi1)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi1 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* phi1 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))))) |
(+.f64 (hypot.f64 phi1 (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 phi1 #s(literal 1/12 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 phi1 phi1)) #s(literal -1/4 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 #s(literal -2 binary64) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi1 phi2) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) phi2))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* -1/4 (* (* phi1 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 phi1 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 3 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))))) |
(* phi1 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) |
(*.f64 phi1 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) |
(* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) |
(*.f64 phi1 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) |
(* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))) |
(*.f64 phi1 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (/.f64 (*.f64 (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 phi1 phi1)))))) |
(* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi1 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi1 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))))) |
(*.f64 phi1 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (/.f64 (*.f64 (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 phi1 phi1)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 #s(literal -2 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) (*.f64 phi1 (*.f64 phi1 phi1))))))) |
(* -1 (* phi1 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) |
(* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))))) phi1) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2))))) phi1))) |
(* -1 (* phi1 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))) phi1) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (* 1/4 (/ (pow (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi1)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi2) (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))))) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) phi1)) phi1))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda1)))) |
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))) lambda2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2) |
(+.f64 lambda1 (-.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 (*.f64 phi2 (-.f64 lambda1 lambda2)))) lambda2)) |
(- (+ lambda1 (* phi2 (+ (* -1/4 (* phi1 (- lambda1 lambda2))) (* -1/8 (* phi2 (- lambda1 lambda2)))))) lambda2) |
(+.f64 lambda1 (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 (-.f64 lambda1 lambda2))))) lambda2)) |
(- (+ lambda1 (* phi2 (+ (* -1/4 (* phi1 (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2) |
(+.f64 lambda1 (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/96 binary64) (*.f64 phi1 (*.f64 phi2 (-.f64 lambda1 lambda2)))))))) lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) (- lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) |
(* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) |
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) phi1))) |
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) phi1))) |
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) phi1))) |
(* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) |
(* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) phi1)) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) phi1))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
lambda1 |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(*.f64 (neg.f64 lambda1) (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(*.f64 (neg.f64 lambda1) (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(*.f64 (neg.f64 lambda1) (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))) |
lambda1 |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) |
(* 1/2 (* phi2 (sin (* 1/2 phi1)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1)))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1))))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/3840 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* 1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2))))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/48 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/3840 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(* R lambda2) |
(*.f64 R lambda2) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(* -1/4 (* phi1 phi2)) |
(*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2)) |
(* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) phi1) (*.f64 #s(literal 1/96 binary64) (*.f64 phi1 (*.f64 phi2 phi2))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) phi1) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/7680 binary64) (*.f64 phi1 (*.f64 phi2 phi2))) (*.f64 #s(literal 1/96 binary64) phi1))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2))))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) phi1) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal 1/96 binary64) phi1) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/7680 binary64) phi1) (*.f64 #s(literal 1/1290240 binary64) (*.f64 phi1 (*.f64 phi2 phi2))))))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/4 (* phi1 phi2))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) phi1) (*.f64 #s(literal -1/8 binary64) phi2)))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8))))) |
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) phi1) (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/96 binary64) (*.f64 phi1 phi2)) #s(literal -1/8 binary64)))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
Compiled 53466 to 4183 computations (92.2% saved)
45 alts after pruning (44 fresh and 1 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1443 | 33 | 1476 |
| Fresh | 13 | 11 | 24 |
| Picked | 4 | 1 | 5 |
| Done | 0 | 0 | 0 |
| Total | 1460 | 45 | 1505 |
| Status | Accuracy | Program |
|---|---|---|
| 54.0% | (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) | |
| ▶ | 29.8% | (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
| 19.4% | (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) | |
| ▶ | 22.1% | (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
| 36.4% | (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) | |
| 17.6% | (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) | |
| 21.3% | (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) | |
| 19.9% | (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 20.4% | (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) | |
| 13.2% | (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 9.7% | (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| 10.1% | (*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 9.6% | (*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 11.4% | (*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| 22.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| ▶ | 22.0% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
| 23.8% | (*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) | |
| 20.0% | (*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) | |
| 54.9% | (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) | |
| 35.5% | (*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) | |
| 17.2% | (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) | |
| 99.8% | (*.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) | |
| ▶ | 99.8% | (*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
| 99.8% | (*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 phi1 phi2))) | |
| 83.1% | (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) | |
| 99.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) | |
| 87.6% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 phi1 phi2))) | |
| 94.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) | |
| 99.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) | |
| 81.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) | |
| 71.6% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) | |
| 88.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 41.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 88.0% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 89.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 80.8% | (*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) | |
| 61.3% | (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) | |
| ▶ | 9.6% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| 11.4% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) | |
| 22.1% | (*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) | |
| 22.0% | (*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) | |
| 50.7% | (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) | |
| 22.1% | (*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) | |
| 13.2% | (*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) | |
| ✓ | 31.8% | (*.f64 R phi2) |
Compiled 2268 to 1376 computations (39.3% saved)
| 1× | egg-herbie |
Found 18 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) |
| ✓ | cost-diff | 0 | (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
| ✓ | cost-diff | 0 | (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
| ✓ | cost-diff | 0 | (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
| ✓ | cost-diff | 0 | (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
| ✓ | cost-diff | 0 | (-.f64 #s(literal 0 binary64) lambda2) |
| ✓ | cost-diff | 0 | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| ✓ | cost-diff | 128 | (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
| ✓ | cost-diff | 0 | (*.f64 R lambda1) |
| ✓ | cost-diff | 0 | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
| ✓ | cost-diff | 0 | (*.f64 R phi1) |
| ✓ | cost-diff | 0 | (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
| ✓ | cost-diff | 0 | (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
| ✓ | cost-diff | 64 | (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) |
| ✓ | cost-diff | 6528 | (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
| 2406× | *-lowering-*.f32 |
| 2406× | *-lowering-*.f64 |
| 1846× | fma-lowering-fma.f32 |
| 1846× | fma-lowering-fma.f64 |
| 1844× | sum4-define |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 50 | 376 |
| 1 | 137 | 370 |
| 2 | 424 | 357 |
| 3 | 2005 | 357 |
| 4 | 7479 | 357 |
| 0 | 8258 | 357 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) |
(sin (/ phi2 2)) |
(/ phi2 2) |
phi2 |
2 |
(neg (* (sin (/ phi1 2)) (- lambda1 lambda2))) |
(* (sin (/ phi1 2)) (- lambda1 lambda2)) |
(sin (/ phi1 2)) |
(/ phi1 2) |
phi1 |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))) |
(cos (/ phi2 2)) |
(* (cos (/ phi1 2)) (- lambda1 lambda2)) |
(cos (/ phi1 2)) |
(- phi1 phi2) |
(- 0 (* R phi1)) |
0 |
(* R phi1) |
R |
phi1 |
(* (neg (* R lambda1)) (cos (* 1/2 (+ phi1 phi2)))) |
(neg (* R lambda1)) |
(* R lambda1) |
R |
lambda1 |
(cos (* 1/2 (+ phi1 phi2))) |
(* 1/2 (+ phi1 phi2)) |
1/2 |
(+ phi1 phi2) |
phi1 |
phi2 |
(* R (* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))))) |
R |
(* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))) |
(- 0 lambda2) |
0 |
lambda2 |
(+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi2)) |
(* 1/2 phi2) |
1/2 |
phi2 |
(* (* -1/2 phi1) (sin (* 1/2 phi2))) |
(* -1/2 phi1) |
-1/2 |
phi1 |
(sin (* 1/2 phi2)) |
(* (- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) (* R lambda2)) |
(- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) |
(* (cos (/ phi1 2)) (cos (/ phi2 2))) |
(cos (/ phi1 2)) |
(/ phi1 2) |
phi1 |
2 |
(cos (/ phi2 2)) |
(/ phi2 2) |
phi2 |
(* (sin (/ phi2 2)) (sin (/ phi1 2))) |
(sin (/ phi2 2)) |
(sin (/ phi1 2)) |
(* R lambda2) |
R |
lambda2 |
| Outputs |
|---|
(* R (sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
R |
(sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2)) |
(+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(sin (/ phi2 2)) |
(sin.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(/ phi2 2) |
(/.f64 phi2 #s(literal 2 binary64)) |
phi2 |
2 |
#s(literal 2 binary64) |
(neg (* (sin (/ phi1 2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) |
(* (sin (/ phi1 2)) (- lambda1 lambda2)) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
(sin (/ phi1 2)) |
(sin.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(/ phi1 2) |
(/.f64 phi1 #s(literal 2 binary64)) |
phi1 |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(cos (/ phi2 2)) |
(cos.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(* (cos (/ phi1 2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(cos (/ phi1 2)) |
(cos.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
(- 0 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
0 |
#s(literal 0 binary64) |
(* R phi1) |
(*.f64 R phi1) |
R |
phi1 |
(* (neg (* R lambda1)) (cos (* 1/2 (+ phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(neg (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) |
(* R lambda1) |
(*.f64 R lambda1) |
R |
lambda1 |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) |
(* 1/2 (+ phi1 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)) |
1/2 |
#s(literal 1/2 binary64) |
(+ phi1 phi2) |
(+.f64 phi2 phi1) |
phi1 |
phi2 |
(* R (* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) |
R |
(* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) |
(- 0 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
0 |
#s(literal 0 binary64) |
lambda2 |
(+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) |
(+.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) |
(* 1/2 phi2) |
(*.f64 phi2 #s(literal 1/2 binary64)) |
1/2 |
#s(literal 1/2 binary64) |
phi2 |
(* (* -1/2 phi1) (sin (* 1/2 phi2))) |
(*.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) |
(* -1/2 phi1) |
(*.f64 phi1 #s(literal -1/2 binary64)) |
-1/2 |
#s(literal -1/2 binary64) |
phi1 |
(sin (* 1/2 phi2)) |
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) |
(* (- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) (* R lambda2)) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(* (cos (/ phi1 2)) (cos (/ phi2 2))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 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)) |
phi1 |
2 |
#s(literal 2 binary64) |
(cos (/ phi2 2)) |
(cos.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(/ phi2 2) |
(/.f64 phi2 #s(literal 2 binary64)) |
phi2 |
(* (sin (/ phi2 2)) (sin (/ phi1 2))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(sin (/ phi2 2)) |
(sin.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(sin (/ phi1 2)) |
(sin.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(* R lambda2) |
(*.f64 R lambda2) |
R |
lambda2 |
Found 18 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 99.9% | (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
| ✓ | accuracy | 99.8% | (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
| ✓ | accuracy | 99.7% | (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
| ✓ | accuracy | 99.7% | (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
| ✓ | accuracy | 100.0% | (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
| ✓ | accuracy | 99.8% | (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
| ✓ | accuracy | 99.8% | (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
| ✓ | accuracy | 95.5% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| ✓ | accuracy | 100.0% | (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
| ✓ | accuracy | 100.0% | (neg.f64 (*.f64 R lambda1)) |
| ✓ | accuracy | 99.7% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
| ✓ | accuracy | 76.5% | (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
| ✓ | accuracy | 100.0% | (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
| ✓ | accuracy | 100.0% | (*.f64 R phi1) |
| ✓ | accuracy | 99.8% | (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
| ✓ | accuracy | 99.8% | (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
| ✓ | accuracy | 99.8% | (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) |
| ✓ | accuracy | 99.8% | (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
| 553.0ms | 186× | 1 | valid |
| 53.0ms | 69× | 0 | valid |
| 3.0ms | 1× | 3 | valid |
Compiled 388 to 47 computations (87.9% saved)
ival-mult: 73.0ms (25.1% of total)ival-sin: 58.0ms (20% of total)compiled-spec: 43.0ms (14.8% of total)backward-pass: 40.0ms (13.8% of total)ival-cos: 36.0ms (12.4% of total)ival-div: 11.0ms (3.8% of total)ival-sub: 11.0ms (3.8% of total)ival-add: 8.0ms (2.8% of total)ival-neg: 5.0ms (1.7% of total)ival-sqrt: 3.0ms (1% of total)const: 1.0ms (0.3% of total)| Inputs |
|---|
#<alt (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))> |
#<alt (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))> |
#<alt (* R (sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (- 0 (* R phi1))> |
#<alt (* R phi1)> |
#<alt (* (neg (* R lambda1)) (cos (* 1/2 (+ phi1 phi2))))> |
#<alt (* R lambda1)> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (* 1/2 (+ phi1 phi2))> |
#<alt (* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))))> |
#<alt (* R (* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))))> |
#<alt (- 0 lambda2)> |
#<alt (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))> |
#<alt (* (- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) (* R lambda2))> |
#<alt (- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2))))> |
#<alt (* (cos (/ phi1 2)) (cos (/ phi2 2)))> |
#<alt (cos (/ phi1 2))> |
#<alt (* (sin (/ phi1 2)) (- lambda1 lambda2))> |
#<alt (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))> |
#<alt (* (cos (/ phi1 2)) (- lambda1 lambda2))> |
#<alt (neg (* R lambda1))> |
#<alt (* (* -1/2 phi1) (sin (* 1/2 phi2)))> |
#<alt (* (sin (/ phi2 2)) (sin (/ phi1 2)))> |
| Outputs |
|---|
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1/2 (* phi1 (- lambda1 lambda2)))> |
#<alt (* phi1 (- (* 1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2))))> |
#<alt (* phi1 (- (* (pow phi1 2) (- (* -1/3840 (* (pow phi1 2) (- lambda1 lambda2))) (* -1/48 (- lambda1 lambda2)))) (* 1/2 (- lambda1 lambda2))))> |
#<alt (* phi1 (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))) (* -1/48 (- lambda1 lambda2)))) (* 1/2 (- lambda1 lambda2))))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (* lambda2 (sin (* 1/2 phi1)))> |
#<alt (- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1)))))> |
#<alt (- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1)))))> |
#<alt (- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1)))))> |
#<alt (* -1 (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1))))> |
#<alt (* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1))))> |
#<alt (* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1))))> |
#<alt (* -1 (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1))))))> |
#<alt (* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1))))))> |
#<alt (* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1))))))> |
#<alt (* -1 (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* lambda2 (sin (* 1/2 phi1)))> |
#<alt (* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1)))))> |
#<alt (* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1)))))> |
#<alt (* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1)))))> |
#<alt (* lambda2 (sin (* 1/2 phi1)))> |
#<alt (* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1)))))> |
#<alt (* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1)))))> |
#<alt (* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1)))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt (* R phi1)> |
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))> |
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* lambda1 (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))> |
#<alt (* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))))> |
#<alt (* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))))> |
#<alt (* -1 (* R (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))> |
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (* R (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))> |
#<alt (* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))))> |
#<alt (* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))))> |
#<alt (* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))))> |
#<alt (* -1 phi1)> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)))))> |
#<alt (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))> |
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))))> |
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))> |
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))))> |
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))> |
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))> |
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))))> |
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))> |
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (* R lambda1)> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (+ phi1 phi2)))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))> |
#<alt (* 1/2 phi2)> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (* 1/2 phi1)> |
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))> |
#<alt (* 1/2 phi1)> |
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))> |
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))> |
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))> |
#<alt (* 1/2 phi1)> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))> |
#<alt (* 1/2 phi2)> |
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))> |
#<alt (* 1/2 phi2)> |
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))> |
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))> |
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 lambda2)> |
#<alt (+ (* -1 lambda2) (* 1/4 (* lambda2 (* phi1 phi2))))> |
#<alt (+ (* -1 lambda2) (* phi2 (+ (* 1/8 (* lambda2 phi2)) (* 1/4 (* lambda2 phi1)))))> |
#<alt (+ (* -1 lambda2) (* phi2 (+ (* 1/4 (* lambda2 phi1)) (* phi2 (+ (* -1/96 (* lambda2 (* phi1 phi2))) (* 1/8 lambda2))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2))))))> |
#<alt (* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2))))))> |
#<alt (* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2))))))> |
#<alt (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R lambda2))> |
#<alt (+ (* -1 (* R lambda2)) (* 1/4 (* R (* lambda2 (* phi1 phi2)))))> |
#<alt (+ (* -1 (* R lambda2)) (* phi2 (+ (* 1/8 (* R (* lambda2 phi2))) (* 1/4 (* R (* lambda2 phi1))))))> |
#<alt (+ (* -1 (* R lambda2)) (* phi2 (+ (* 1/4 (* R (* lambda2 phi1))) (* phi2 (+ (* -1/96 (* R (* lambda2 (* phi1 phi2)))) (* 1/8 (* R lambda2)))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))> |
#<alt (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))> |
#<alt (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))> |
#<alt (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))))> |
#<alt (* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))))> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt (* -1 lambda2)> |
#<alt 1> |
#<alt (+ 1 (* -1/4 (* phi1 phi2)))> |
#<alt (+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2))))> |
#<alt (+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt 1> |
#<alt (+ 1 (* -1/8 (pow phi1 2)))> |
#<alt (+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))> |
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (* 1/2 (* phi1 (- lambda1 lambda2)))> |
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2))))> |
#<alt (* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* 1/3840 (* (pow phi1 2) (- lambda1 lambda2)))))))> |
#<alt (* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2))))))))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* -1 (* lambda2 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* lambda1 (sin (* 1/2 phi1)))> |
#<alt (* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (sin (* 1/2 phi1)))> |
#<alt (* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (sin (* 1/2 phi1)))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* -1 (* lambda2 (sin (* 1/2 phi1))))> |
#<alt (* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))> |
#<alt (* -1 (* lambda2 (sin (* 1/2 phi1))))> |
#<alt (* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/8 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/384 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))))> |
#<alt (+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))))))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/8 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/384 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))))> |
#<alt (+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))))))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1))))> |
#<alt (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))> |
#<alt (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (- lambda1 lambda2)> |
#<alt (- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)> |
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)> |
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))> |
#<alt (* lambda1 (cos (* 1/2 phi1)))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (cos (* 1/2 phi1)))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (cos (* 1/2 phi1)))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))> |
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/4 (* phi1 phi2))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2)))))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1)))))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2)))))))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* 1/2 (* phi2 (sin (* 1/2 phi1))))> |
#<alt (* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))> |
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))> |
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* 1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))> |
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))> |
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
195 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 30.0ms | lambda1 | @ | 0 | (* R (sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 25.0ms | lambda2 | @ | 0 | (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) |
| 23.0ms | lambda2 | @ | inf | (* (- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) (* R lambda2)) |
| 14.0ms | phi1 | @ | -inf | (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) |
| 12.0ms | phi2 | @ | inf | (* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))) |
| 1× | batch-egg-rewrite |
| 3184× | *-lowering-*.f32 |
| 3184× | *-lowering-*.f64 |
| 1554× | /-lowering-/.f32 |
| 1554× | /-lowering-/.f64 |
| 1464× | +-lowering-+.f64 |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 50 | 272 |
| 1 | 176 | 254 |
| 2 | 757 | 205 |
| 0 | 8017 | 205 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) |
(neg (* (sin (/ phi1 2)) (- lambda1 lambda2))) |
(* R (sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2)))) (+ (* (sin (/ phi2 2)) (neg (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(- 0 (* R phi1)) |
(* R phi1) |
(* (neg (* R lambda1)) (cos (* 1/2 (+ phi1 phi2)))) |
(* R lambda1) |
(cos (* 1/2 (+ phi1 phi2))) |
(* 1/2 (+ phi1 phi2)) |
(* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))) |
(* R (* (- 0 lambda2) (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))))) |
(- 0 lambda2) |
(+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) |
(* (- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) (* R lambda2)) |
(- (* (cos (/ phi1 2)) (cos (/ phi2 2))) (* (sin (/ phi2 2)) (sin (/ phi1 2)))) |
(* (cos (/ phi1 2)) (cos (/ phi2 2))) |
(cos (/ phi1 2)) |
(* (sin (/ phi1 2)) (- lambda1 lambda2)) |
(* (cos (/ phi2 2)) (* (cos (/ phi1 2)) (- lambda1 lambda2))) |
(* (cos (/ phi1 2)) (- lambda1 lambda2)) |
(neg (* R lambda1)) |
(* (* -1/2 phi1) (sin (* 1/2 phi2))) |
(* (sin (/ phi2 2)) (sin (/ phi1 2))) |
| Outputs |
|---|
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (fma.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (fma.f64 (-.f64 lambda2 lambda1) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))))) |
(+.f64 (+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 0 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda2 lambda1) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) #s(literal 0 binary64)) |
(+.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 lambda2 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) |
(+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1) #s(literal -1 binary64)) (*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal -1 binary64))) |
(+.f64 (+.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) |
(-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1)) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 lambda1 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda1 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) #s(literal -1 binary64)) |
(*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) |
(*.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) |
(*.f64 (-.f64 lambda2 lambda1) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
(pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64)) |
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 phi1 R))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) #s(literal 0 binary64)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 phi1 R) #s(literal 0 binary64))) |
(fma.f64 phi1 (-.f64 #s(literal 0 binary64) R) #s(literal 0 binary64)) |
(fma.f64 R (-.f64 #s(literal 0 binary64) phi1) #s(literal 0 binary64)) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) R #s(literal 0 binary64)) |
(fma.f64 #s(literal -1 binary64) (*.f64 phi1 R) #s(literal 0 binary64)) |
(fma.f64 (-.f64 #s(literal 0 binary64) R) phi1 #s(literal 0 binary64)) |
(neg.f64 (*.f64 phi1 R)) |
(*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) |
(*.f64 R (-.f64 #s(literal 0 binary64) phi1)) |
(*.f64 (*.f64 phi1 R) #s(literal -1 binary64)) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) R) |
(*.f64 #s(literal -1 binary64) (*.f64 phi1 R)) |
(*.f64 (-.f64 #s(literal 0 binary64) R) phi1) |
(*.f64 phi1 R) |
(*.f64 R phi1) |
(+.f64 #s(literal 0 binary64) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 0 binary64)) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(neg.f64 (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(/.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 2 binary64)) |
(/.f64 (*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) #s(literal 2 binary64)) |
(/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) #s(literal 4 binary64)) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) R))) |
(*.f64 lambda1 (*.f64 R (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) lambda1))) |
(*.f64 R (*.f64 lambda1 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) |
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 lambda1 R)) |
(*.f64 (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal -1 binary64)) |
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) R)) lambda1) |
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) lambda1)) R) |
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) R)) |
(*.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal -1 binary64)) lambda1) |
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) lambda1) R) |
(*.f64 lambda1 R) |
(*.f64 R lambda1) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) |
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 4 binary64))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 0 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))) |
(/.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/4 binary64)) |
(+.f64 (/.f64 phi2 #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64))) |
(+.f64 (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi2 #s(literal 2 binary64))) |
(-.f64 (/.f64 phi2 #s(literal 2 binary64)) (/.f64 phi1 #s(literal -2 binary64))) |
(-.f64 (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi2 #s(literal -2 binary64))) |
(fma.f64 phi2 #s(literal 1/2 binary64) (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 phi1 #s(literal 1/2 binary64) (/.f64 phi2 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) phi2 (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1/2 binary64) phi1 (/.f64 phi2 #s(literal 2 binary64))) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal -1/2 binary64) (/.f64 phi2 #s(literal 2 binary64))) |
(fma.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1/2 binary64) (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1 binary64) (/.f64 phi2 #s(literal 2 binary64)) (/.f64 phi1 #s(literal 2 binary64))) |
(fma.f64 #s(literal 1 binary64) (/.f64 phi1 #s(literal 2 binary64)) (/.f64 phi2 #s(literal 2 binary64))) |
(neg.f64 (+.f64 (/.f64 phi2 #s(literal -2 binary64)) (/.f64 phi1 #s(literal -2 binary64)))) |
(neg.f64 (+.f64 (/.f64 phi1 #s(literal -2 binary64)) (/.f64 phi2 #s(literal -2 binary64)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 4 binary64) phi2) (+.f64 #s(literal 2 binary64) (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -4 binary64) phi1) (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 4 binary64) phi1) phi2) (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 phi1 #s(literal -2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 4 binary64) phi1) (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1)))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -4 binary64) phi2) (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)))) |
(/.f64 (+.f64 #s(literal 2 binary64) (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 #s(literal 4 binary64) phi2)) |
(/.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) (/.f64 #s(literal -4 binary64) phi2)) |
(/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 (/.f64 #s(literal 4 binary64) phi1) phi2)) |
(/.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 phi1 #s(literal -2 binary64))) #s(literal -4 binary64)) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)) |
(/.f64 (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1)) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) (/.f64 #s(literal -4 binary64) phi1)) |
(/.f64 (+.f64 (*.f64 phi2 (/.f64 #s(literal -2 binary64) phi1)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) (/.f64 #s(literal -2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) phi1)) (*.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi2) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi2) phi1)) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal 2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi2) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal -2 binary64))) |
(/.f64 (+.f64 (/.f64 #s(literal -2 binary64) phi1) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi2) (/.f64 #s(literal 2 binary64) phi1))) |
(/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (*.f64 (/.f64 #s(literal -2 binary64) phi2) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi2) (/.f64 #s(literal -2 binary64) phi1))) |
(/.f64 (+.f64 (*.f64 phi1 (/.f64 #s(literal -2 binary64) phi2)) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 #s(literal -2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) phi2)) (*.f64 (/.f64 #s(literal 2 binary64) phi1) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi1) phi2)) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal 2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal -2 binary64) phi1) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal -2 binary64))) |
(/.f64 (+.f64 (/.f64 #s(literal -2 binary64) phi2) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2))) |
(/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi2) (*.f64 (/.f64 #s(literal -2 binary64) phi1) #s(literal -1 binary64))) (*.f64 (/.f64 #s(literal -2 binary64) phi1) (/.f64 #s(literal -2 binary64) phi2))) |
(/.f64 (neg.f64 (+.f64 #s(literal 2 binary64) (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64))))) (neg.f64 (/.f64 #s(literal 4 binary64) phi2))) |
(/.f64 (neg.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2))) (neg.f64 (/.f64 #s(literal -4 binary64) phi2))) |
(/.f64 (neg.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2))) (neg.f64 (/.f64 (/.f64 #s(literal 4 binary64) phi1) phi2))) |
(/.f64 (neg.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 phi1 #s(literal -2 binary64)))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1)))) (neg.f64 (/.f64 #s(literal 4 binary64) phi1))) |
(/.f64 (neg.f64 (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1))) #s(literal -4 binary64)) |
(/.f64 (neg.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1))) (neg.f64 (/.f64 #s(literal -4 binary64) phi1))) |
(/.f64 (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) phi2)) |
(/.f64 (/.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) #s(literal -2 binary64)) (/.f64 #s(literal 2 binary64) phi2)) |
(/.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)) |
(/.f64 (/.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) (/.f64 #s(literal 2 binary64) phi1)) #s(literal -2 binary64)) |
(/.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 #s(literal 2 binary64) phi1)) (/.f64 #s(literal 2 binary64) phi2)) |
(/.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 #s(literal 2 binary64) phi1)) |
(/.f64 (/.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) #s(literal -2 binary64)) (/.f64 #s(literal 2 binary64) phi1)) |
(/.f64 (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 #s(literal 2 binary64) phi2)) #s(literal 2 binary64)) |
(/.f64 (/.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) (/.f64 #s(literal 2 binary64) phi2)) #s(literal -2 binary64)) |
(/.f64 (/.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 #s(literal 2 binary64) phi1)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)) |
(*.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64)) |
(*.f64 #s(literal -1/2 binary64) (+.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 0 binary64) phi1))) |
(*.f64 #s(literal -1/2 binary64) (+.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi2))) |
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) |
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 phi1 (/.f64 phi2 #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) phi2))) |
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) phi2))) |
(*.f64 (+.f64 (/.f64 #s(literal 2 binary64) phi1) (/.f64 #s(literal 2 binary64) phi2)) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 4 binary64) phi1) phi2))) |
(*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 phi1 #s(literal -2 binary64))) #s(literal -1/4 binary64)) |
(*.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) phi1))) |
(*.f64 (+.f64 (*.f64 phi2 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) phi1)) #s(literal 1/4 binary64)) |
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -4 binary64) phi1))) |
(+.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 0 binary64)) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64)))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (/.f64 phi1 #s(literal -2 binary64)) lambda2))) |
(-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (*.f64 lambda2 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64)))))) |
(fma.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 phi1 (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64)))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (/.f64 phi1 #s(literal -2 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) phi1) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (/.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(neg.f64 (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(*.f64 lambda2 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) |
(*.f64 #s(literal -1 binary64) (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2) |
(*.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) #s(literal -1 binary64)) lambda2) |
(+.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R))) (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 0 binary64))) |
(+.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R))) (*.f64 #s(literal 0 binary64) (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))))) |
(+.f64 (*.f64 (*.f64 R (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R))) (*.f64 (*.f64 R (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 0 binary64)) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (*.f64 (*.f64 R (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 R (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 R (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) R (*.f64 (*.f64 R (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (*.f64 R (*.f64 #s(literal -1 binary64) (*.f64 lambda2 (/.f64 phi1 #s(literal -2 binary64))))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)))) |
(neg.f64 (*.f64 (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) R)) |
(neg.f64 (*.f64 lambda2 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))))) |
(neg.f64 (*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(neg.f64 (*.f64 R (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))))) |
(neg.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 lambda2 R))) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R))) |
(*.f64 (*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) R) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(*.f64 #s(literal -1 binary64) (*.f64 lambda2 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) |
(*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal -1 binary64)) lambda2) |
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) lambda2)) |
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal 0 binary64)) |
(-.f64 #s(literal 0 binary64) lambda2) |
(-.f64 #s(literal 0 binary64) (-.f64 lambda2 #s(literal 0 binary64))) |
(fma.f64 #s(literal -1 binary64) lambda2 #s(literal 0 binary64)) |
(neg.f64 lambda2) |
(*.f64 lambda2 #s(literal -1 binary64)) |
(*.f64 #s(literal -1 binary64) lambda2) |
(+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 phi1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) phi1) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) phi1) #s(literal -1/2 binary64) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (/.f64 phi1 #s(literal -2 binary64)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) phi1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R)) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R)) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 lambda2 R))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R)) (+.f64 (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (*.f64 lambda2 R) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 lambda2 R))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R))) |
(fma.f64 lambda2 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 R (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 lambda2 R) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 lambda2 R) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(fma.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) lambda2 (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) R (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 2 binary64)) |
(/.f64 (*.f64 (*.f64 lambda2 R) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 lambda2 R)) #s(literal 2 binary64)) |
(/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 lambda2 R)) #s(literal 4 binary64)) |
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R)) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) lambda2) |
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) R) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) |
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 4 binary64))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 0 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))) |
(/.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/4 binary64)) |
(neg.f64 (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal -2 binary64))) |
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal -1/2 binary64)) |
(cos.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(cos.f64 (/.f64 phi1 #s(literal -2 binary64))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1)) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 lambda1 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(fma.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(/.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))))) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal -2 binary64)) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))))) #s(literal -2 binary64)) |
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) (-.f64 lambda1 lambda2)) #s(literal -2 binary64)) |
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64)))) (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))))) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 lambda1 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 lambda1 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
(+.f64 #s(literal 0 binary64) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) |
(+.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) #s(literal 0 binary64)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(neg.f64 (*.f64 lambda1 R)) |
(*.f64 lambda1 (-.f64 #s(literal 0 binary64) R)) |
(*.f64 R (-.f64 #s(literal 0 binary64) lambda1)) |
(*.f64 (*.f64 lambda1 R) #s(literal -1 binary64)) |
(*.f64 #s(literal -1 binary64) (*.f64 lambda1 R)) |
(*.f64 (-.f64 #s(literal 0 binary64) R) lambda1) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) R) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) |
(*.f64 phi1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) phi1)) |
(*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) phi1) #s(literal -1/2 binary64)) |
(*.f64 (/.f64 phi1 #s(literal -2 binary64)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) #s(literal -1/2 binary64)) phi1) |
(+.f64 (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) |
(-.f64 (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))) |
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -2 binary64)) |
(/.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -1 binary64)) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 phi2 phi1) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -1/2 binary64)) |
| 1× | egg-herbie |
| 6294× | *-lowering-*.f32 |
| 6294× | *-lowering-*.f64 |
| 4832× | +-lowering-+.f64 |
| 4832× | +-lowering-+.f32 |
| 1394× | *-commutative |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1211 | 18972 |
| 1 | 4443 | 16893 |
| 0 | 8145 | 16893 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1/2 (* phi1 (- lambda1 lambda2))) |
(* phi1 (- (* 1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2)))) |
(* phi1 (- (* (pow phi1 2) (- (* -1/3840 (* (pow phi1 2) (- lambda1 lambda2))) (* -1/48 (- lambda1 lambda2)))) (* 1/2 (- lambda1 lambda2)))) |
(* phi1 (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))) (* -1/48 (- lambda1 lambda2)))) (* 1/2 (- lambda1 lambda2)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(* lambda2 (sin (* 1/2 phi1))) |
(- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1))))) |
(- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1))))) |
(- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1))))) |
(* -1 (* lambda1 (sin (* 1/2 phi1)))) |
(* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1)))) |
(* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1)))) |
(* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1)))) |
(* -1 (* lambda1 (sin (* 1/2 phi1)))) |
(* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1)))))) |
(* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1)))))) |
(* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1)))))) |
(* -1 (* lambda1 (sin (* 1/2 phi1)))) |
(- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1)))) |
(- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1)))) |
(- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1)))) |
(* lambda2 (sin (* 1/2 phi1))) |
(* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1))))) |
(* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1))))) |
(* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1))))) |
(* lambda2 (sin (* 1/2 phi1))) |
(* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1))))) |
(* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1))))) |
(* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1))))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(* R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))) |
(* -1 (* R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1))))) |
(* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* lambda1 (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) |
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))) |
(* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))))) |
(* -1 (* R (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(* R (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))) |
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))) |
(* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))))) |
(* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))) |
(* -1 phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1))))) |
(sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2)))))))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2)))))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1))))))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(* R lambda1) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(* 1/2 phi2) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(* 1/2 phi1) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(* 1/2 phi1) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(* 1/2 phi1) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(* 1/2 phi2) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(* 1/2 phi2) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 lambda2) |
(+ (* -1 lambda2) (* 1/4 (* lambda2 (* phi1 phi2)))) |
(+ (* -1 lambda2) (* phi2 (+ (* 1/8 (* lambda2 phi2)) (* 1/4 (* lambda2 phi1))))) |
(+ (* -1 lambda2) (* phi2 (+ (* 1/4 (* lambda2 phi1)) (* phi2 (+ (* -1/96 (* lambda2 (* phi1 phi2))) (* 1/8 lambda2)))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (cos (* 1/2 phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) |
(* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))) |
(* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))) |
(* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))) |
(* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) |
(* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1)))) |
(* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1)))) |
(* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1)))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R lambda2)) |
(+ (* -1 (* R lambda2)) (* 1/4 (* R (* lambda2 (* phi1 phi2))))) |
(+ (* -1 (* R lambda2)) (* phi2 (+ (* 1/8 (* R (* lambda2 phi2))) (* 1/4 (* R (* lambda2 phi1)))))) |
(+ (* -1 (* R lambda2)) (* phi2 (+ (* 1/4 (* R (* lambda2 phi1))) (* phi2 (+ (* -1/96 (* R (* lambda2 (* phi1 phi2)))) (* 1/8 (* R lambda2))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))) |
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))) |
(* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))) |
(* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))) |
(* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))) |
(* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))) |
(* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))) |
(* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
(* -1 lambda2) |
1 |
(+ 1 (* -1/4 (* phi1 phi2))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2)))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 phi1)))) |
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2))))))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2)))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1))))))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1)))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
1 |
(+ 1 (* -1/8 (pow phi1 2))) |
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8))) |
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8))) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(cos (* 1/2 phi1)) |
(* 1/2 (* phi1 (- lambda1 lambda2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2)))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* 1/3840 (* (pow phi1 2) (- lambda1 lambda2))))))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))))))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/8 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/384 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/8 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/384 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(- lambda1 lambda2) |
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2) |
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2) |
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(* -1 (* lambda2 (cos (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(* lambda1 (cos (* 1/2 phi1))) |
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(* lambda1 (cos (* 1/2 phi1))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(* lambda1 (cos (* 1/2 phi1))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(* -1 (* lambda2 (cos (* 1/2 phi1)))) |
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))) |
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))) |
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))) |
(* -1 (* lambda2 (cos (* 1/2 phi1)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1 (* R lambda1)) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/4 (* phi1 phi2)) |
(* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2))))))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* 1/2 (* phi2 (sin (* 1/2 phi1)))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1)))))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* 1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2)))))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
| Outputs |
|---|
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 phi2 #s(literal -1/8 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))) |
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(*.f64 lambda1 (-.f64 (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(*.f64 lambda1 (-.f64 (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(*.f64 lambda1 (-.f64 (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (/.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (/.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (/.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1/2 (* phi1 (- lambda1 lambda2))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))) |
(* phi1 (- (* 1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2)))) |
(*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 phi1 phi1)) #s(literal -1/2 binary64)))) |
(* phi1 (- (* (pow phi1 2) (- (* -1/3840 (* (pow phi1 2) (- lambda1 lambda2))) (* -1/48 (- lambda1 lambda2)))) (* 1/2 (- lambda1 lambda2)))) |
(*.f64 phi1 (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/3840 binary64) (*.f64 phi1 phi1)) #s(literal 1/48 binary64)))) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))) |
(* phi1 (- (* (pow phi1 2) (- (* (pow phi1 2) (- (* 1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))) (* -1/48 (- lambda1 lambda2)))) (* 1/2 (- lambda1 lambda2)))) |
(*.f64 phi1 (+.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal 1/645120 binary64) (*.f64 phi1 phi1)) #s(literal -1/3840 binary64)))) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/48 binary64)))) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (sin (* 1/2 phi1))) |
(*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(- (* -1 (* lambda1 (sin (* 1/2 phi1)))) (* -1 (* lambda2 (sin (* 1/2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1)))) |
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1)))) |
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda1 (- (/ (* lambda2 (sin (* 1/2 phi1))) lambda1) (sin (* 1/2 phi1)))) |
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1)))))) |
(*.f64 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1)))))) |
(*.f64 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)) (* -1 (sin (* 1/2 phi1)))))) |
(*.f64 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda2 lambda1)) |
(- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda2 lambda1)) |
(- (* lambda2 (sin (* 1/2 phi1))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda2 lambda1)) |
(* lambda2 (sin (* 1/2 phi1))) |
(*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1))))) |
(*.f64 lambda2 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1))))) |
(*.f64 lambda2 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* lambda2 (- (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1 (sin (* 1/2 phi1))))) |
(*.f64 lambda2 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* lambda2 (sin (* 1/2 phi1))) |
(*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1))))) |
(*.f64 lambda2 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1))))) |
(*.f64 lambda2 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* -1 (* lambda2 (- (/ (* lambda1 (sin (* 1/2 phi1))) lambda2) (sin (* 1/2 phi1))))) |
(*.f64 lambda2 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 R) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 (*.f64 phi2 R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 R (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))))))) |
(* R phi2) |
(*.f64 phi2 R) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (/.f64 (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi2 phi2))))))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 R)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 phi1 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 phi1 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi2)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 R) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (*.f64 phi1 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 phi1 R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (*.f64 R (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))) |
(* R phi1) |
(*.f64 phi1 R) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (/.f64 (*.f64 phi2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi1 phi1))))))) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 phi2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 phi2 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (*.f64 phi2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi1)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(*.f64 R (+.f64 (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 lambda1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 R (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))))))) |
(* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(* lambda1 (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) |
(*.f64 lambda1 (*.f64 R (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))) |
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))) |
(*.f64 lambda1 (+.f64 (*.f64 R (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1))))) |
(* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))))) |
(*.f64 lambda1 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1))) (+.f64 (*.f64 R (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))))))) |
(* -1 (* R (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (+.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (-.f64 (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (/.f64 (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(*.f64 R (+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (-.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (*.f64 R (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))))) |
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda2 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 R (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (-.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 R (-.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))))))) |
(* R (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))) |
(*.f64 lambda2 (*.f64 R (+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))) |
(*.f64 lambda2 (+.f64 (*.f64 R (+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2))))) |
(* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))))) |
(*.f64 lambda2 (+.f64 (+.f64 (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (*.f64 R (+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))))) |
(* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (+.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (-.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (/.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi2 phi2)))) (/.f64 phi1 phi2)))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi2)) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi2)) phi2))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (*.f64 phi1 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi1 phi1)))) (/.f64 phi2 phi1)))) |
(* -1 phi1) |
(-.f64 #s(literal 0 binary64) phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi1)) phi1))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi1)) phi1))) |
(sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) |
(hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(+.f64 (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda1 (+.f64 (*.f64 (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (*.f64 lambda1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))) |
(*.f64 lambda1 (-.f64 (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1))))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))))) |
(*.f64 lambda1 (+.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1))))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1)))))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 #s(literal 0 binary64) lambda1))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) |
(hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) |
(+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (-.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))) |
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) |
(+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (*.f64 lambda2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (-.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (/.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))))) |
(*.f64 lambda2 (+.f64 (-.f64 (-.f64 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 lambda1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) lambda2))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* -1 (* R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2)))))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2)))))))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) R) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1))))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) R) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* R lambda1) |
(*.f64 lambda1 R) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi2 (* -1 phi1)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (+ phi1 phi2))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(cos (* 1/2 (- phi1 (* -1 phi2)))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(* 1/2 phi1) |
(*.f64 #s(literal 1/2 binary64) phi1) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1))) |
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))) |
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1))) |
(* 1/2 phi1) |
(*.f64 #s(literal 1/2 binary64) phi1) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64))) |
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64))) |
(* 1/2 phi1) |
(*.f64 #s(literal 1/2 binary64) phi1) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(+ (* 1/2 phi1) (* 1/2 phi2)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(*.f64 phi2 (*.f64 (+.f64 (/.f64 phi1 phi2) #s(literal 1 binary64)) #s(literal 1/2 binary64))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(*.f64 phi2 (*.f64 (+.f64 (/.f64 phi1 phi2) #s(literal 1 binary64)) #s(literal 1/2 binary64))) |
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2)))) |
(*.f64 phi2 (*.f64 (+.f64 (/.f64 phi1 phi2) #s(literal 1 binary64)) #s(literal 1/2 binary64))) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))) |
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(+ (* -1 lambda2) (* 1/4 (* lambda2 (* phi1 phi2)))) |
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2) |
(+ (* -1 lambda2) (* phi2 (+ (* 1/8 (* lambda2 phi2)) (* 1/4 (* lambda2 phi1))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 phi2)) (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)))) lambda2) |
(+ (* -1 lambda2) (* phi2 (+ (* 1/4 (* lambda2 phi1)) (* phi2 (+ (* -1/96 (* lambda2 (* phi1 phi2))) (* 1/8 lambda2)))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (cos (* 1/2 phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))) |
(*.f64 phi1 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))) |
(*.f64 phi1 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* phi1 (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) phi1)) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))) |
(*.f64 phi1 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (/ (* lambda2 (cos (* 1/2 phi2))) phi1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1) (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(+ (* -1 (* R lambda2)) (* 1/4 (* R (* lambda2 (* phi1 phi2))))) |
(-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 lambda2 R)) |
(+ (* -1 (* R lambda2)) (* phi2 (+ (* 1/8 (* R (* lambda2 phi2))) (* 1/4 (* R (* lambda2 phi1)))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(+ (* -1 (* R lambda2)) (* phi2 (+ (* 1/4 (* R (* lambda2 phi1))) (* phi2 (+ (* -1/96 (* R (* lambda2 (* phi1 phi2)))) (* 1/8 (* R lambda2))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))) |
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))) |
(*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))) |
(*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))) |
(*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/4 (* phi1 phi2))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8))))) |
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal -1/8 binary64) R) (*.f64 (*.f64 phi1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/48 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (cos (* 1/2 phi1)))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal -1/8 binary64) R) (*.f64 (*.f64 lambda2 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal 1/48 binary64) R) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2))))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64)))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))) |
(*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal -1/8 binary64) (*.f64 #s(literal 1/384 binary64) (*.f64 phi2 phi2)))))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 phi2 phi2)) #s(literal 1/384 binary64))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/8 (pow phi1 2))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1))) |
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) |
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64)))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(* 1/2 (* phi1 (- lambda1 lambda2))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2)))) |
(*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1))))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* 1/3840 (* (pow phi1 2) (- lambda1 lambda2))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal -1/48 binary64) (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1))))))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi1 phi1)) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* lambda1 (sin (* 1/2 phi1))) |
(*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (sin (* 1/2 phi1))) |
(*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (sin (* 1/2 phi1))) |
(*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1/8 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/384 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi2 phi2)) #s(literal -1/8 binary64))))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 phi2 phi2)) #s(literal 1/384 binary64))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/8 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/384 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64)))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2) |
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1)) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)) |
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2) |
(+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) (-.f64 lambda1 lambda2)) |
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2) |
(+.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64))))))) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* -1 (* lambda2 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* lambda1 (cos (* 1/2 phi1))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) |
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))) |
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))) |
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))) |
(* lambda1 (cos (* 1/2 phi1))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* lambda1 (cos (* 1/2 phi1))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(* -1 (* lambda2 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda2 (cos (* 1/2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/4 (* phi1 phi2)) |
(*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2)) |
(* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2))))) |
(*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 phi1 (*.f64 phi2 phi2))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1))))) |
(*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi2 phi2)) #s(literal -1/7680 binary64)) (*.f64 phi1 #s(literal 1/96 binary64)))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2))))))))) |
(*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 phi1 #s(literal 1/96 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 phi1 #s(literal -1/7680 binary64)) (*.f64 (*.f64 phi1 (*.f64 phi2 phi2)) #s(literal 1/1290240 binary64)))))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* 1/2 (* phi2 (sin (* 1/2 phi1)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))) |
(*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 phi2 phi2))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1)))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal -1/48 binary64) (*.f64 #s(literal 1/3840 binary64) (*.f64 phi2 phi2))))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1))))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi2 phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi2 phi2)) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* 1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))) |
(*.f64 phi1 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 #s(literal -1/48 binary64) (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1))))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2))))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi1 phi1)) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
Compiled 40003 to 2864 computations (92.8% saved)
62 alts after pruning (60 fresh and 2 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1282 | 35 | 1317 |
| Fresh | 14 | 25 | 39 |
| Picked | 4 | 1 | 5 |
| Done | 0 | 1 | 1 |
| Total | 1300 | 62 | 1362 |
| Status | Accuracy | Program |
|---|---|---|
| 7.2% | (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) | |
| 8.8% | (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) | |
| 16.7% | (-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) | |
| 54.0% | (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) | |
| 3.3% | (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) | |
| 17.5% | (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) | |
| 22.1% | (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) | |
| ✓ | 22.1% | (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
| 36.4% | (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) | |
| 20.1% | (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) | |
| 7.9% | (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 22.0% | (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) | |
| ▶ | 21.3% | (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
| 10.1% | (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 19.9% | (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 20.4% | (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) | |
| 13.2% | (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) | |
| 13.2% | (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 9.7% | (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| 11.4% | (*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| 22.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) | |
| 22.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) | |
| 23.8% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 21.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) | |
| 21.5% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) | |
| 22.7% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) | |
| 20.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) | |
| 22.0% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 21.8% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) | |
| 20.0% | (*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) | |
| 54.9% | (*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) | |
| 35.5% | (*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) | |
| 17.7% | (*.f64 lambda2 (*.f64 R (+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) | |
| 17.2% | (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) | |
| 81.8% | (*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) (-.f64 phi1 phi2))) | |
| ▶ | 99.8% | (*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
| ▶ | 83.1% | (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
| 87.6% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 phi1 phi2))) | |
| 94.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) | |
| 81.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) | |
| 71.6% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) | |
| 88.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 41.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 88.0% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 89.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 77.1% | (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) | |
| 80.8% | (*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) | |
| 61.3% | (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) | |
| 9.9% | (*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) | |
| 8.4% | (*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) | |
| 11.6% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) | |
| 14.2% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) | |
| 11.4% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) | |
| 7.9% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) | |
| 9.6% | (*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) | |
| 22.1% | (*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) | |
| 22.0% | (*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) | |
| 50.7% | (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) | |
| ▶ | 22.1% | (*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| ✓ | 31.8% | (*.f64 R phi2) |
| 10.7% | (neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) | |
| ▶ | 29.8% | (neg.f64 (*.f64 phi1 R)) |
Compiled 3056 to 1909 computations (37.5% saved)
| 1× | egg-herbie |
Found 18 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | cost-diff | 0 | (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
| ✓ | cost-diff | 0 | (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
| ✓ | cost-diff | 0 | (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
| ✓ | cost-diff | 0 | (*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| ✓ | cost-diff | 0 | (*.f64 #s(literal 1/2 binary64) phi2) |
| ✓ | cost-diff | 0 | (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
| ✓ | cost-diff | 0 | (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
| ✓ | cost-diff | 0 | (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
| ✓ | cost-diff | 0 | (-.f64 phi1 phi2) |
| ✓ | cost-diff | 0 | (-.f64 lambda1 lambda2) |
| ✓ | cost-diff | 0 | (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
| ✓ | cost-diff | -64 | (neg.f64 (*.f64 phi1 R)) |
| ✓ | cost-diff | 0 | (*.f64 phi1 R) |
| ✓ | cost-diff | 0 | (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
| ✓ | cost-diff | 0 | (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)) |
| ✓ | cost-diff | 0 | (*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
| ✓ | cost-diff | 256 | (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
| 3654× | *-lowering-*.f32 |
| 3654× | *-lowering-*.f64 |
| 2416× | +-lowering-+.f64 |
| 2416× | +-lowering-+.f32 |
| 1250× | neg-lowering-neg.f64 |
Useful iterations: 3 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 48 | 366 |
| 1 | 110 | 364 |
| 2 | 268 | 355 |
| 3 | 923 | 352 |
| 4 | 4304 | 352 |
| 5 | 7923 | 352 |
| 0 | 8265 | 352 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) |
(* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) |
(cos (/ phi2 2)) |
(/ phi2 2) |
phi2 |
2 |
(* (- lambda1 lambda2) (cos (/ phi1 2))) |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(cos (/ phi1 2)) |
(/ phi1 2) |
phi1 |
(* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))) |
(sin (/ phi2 2)) |
(* (sin (/ phi1 2)) (- lambda1 lambda2)) |
(sin (/ phi1 2)) |
(- phi1 phi2) |
(neg (* phi1 R)) |
(* phi1 R) |
phi1 |
R |
(* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))) |
R |
(sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))) |
(- lambda1 lambda2) |
lambda1 |
lambda2 |
(- phi1 phi2) |
phi1 |
phi2 |
(* (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) (* R lambda2)) |
(+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi2)) |
(* 1/2 phi2) |
1/2 |
phi2 |
(* (* -1/2 phi1) (sin (* 1/2 phi2))) |
(* -1/2 phi1) |
-1/2 |
phi1 |
(sin (* 1/2 phi2)) |
(* R lambda2) |
R |
lambda2 |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
R |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
lambda2 |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(cos (* 1/2 phi1)) |
(* 1/2 phi1) |
1/2 |
phi1 |
(cos (* 1/2 phi2)) |
(* 1/2 phi2) |
phi2 |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(sin (* 1/2 phi1)) |
(sin (* 1/2 phi2)) |
| Outputs |
|---|
(* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
R |
(sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2)) |
(- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) |
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(cos (/ phi2 2)) |
(cos.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(/ phi2 2) |
(/.f64 phi2 #s(literal 2 binary64)) |
phi2 |
2 |
#s(literal 2 binary64) |
(* (- lambda1 lambda2) (cos (/ phi1 2))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(cos (/ phi1 2)) |
(cos.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(/ phi1 2) |
(/.f64 phi1 #s(literal 2 binary64)) |
phi1 |
(* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(sin (/ phi2 2)) |
(sin.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(* (sin (/ phi1 2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(sin (/ phi1 2)) |
(sin.f64 (/.f64 phi1 #s(literal 2 binary64))) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
(neg (* phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(* phi1 R) |
(*.f64 R phi1) |
phi1 |
R |
(* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
R |
(sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))) |
(hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
lambda2 |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
phi1 |
phi2 |
(* (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) (* R lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) (*.f64 R lambda2)) |
(+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) |
(+.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) |
(* 1/2 phi2) |
(*.f64 phi2 #s(literal 1/2 binary64)) |
1/2 |
#s(literal 1/2 binary64) |
phi2 |
(* (* -1/2 phi1) (sin (* 1/2 phi2))) |
(*.f64 (*.f64 phi1 #s(literal -1/2 binary64)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) |
(* -1/2 phi1) |
(*.f64 phi1 #s(literal -1/2 binary64)) |
-1/2 |
#s(literal -1/2 binary64) |
phi1 |
(sin (* 1/2 phi2)) |
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) |
(* R lambda2) |
(*.f64 R lambda2) |
R |
lambda2 |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda2 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))) |
R |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))) |
lambda2 |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) |
(* 1/2 phi1) |
(*.f64 phi1 #s(literal 1/2 binary64)) |
1/2 |
#s(literal 1/2 binary64) |
phi1 |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) |
(* 1/2 phi2) |
(*.f64 phi2 #s(literal 1/2 binary64)) |
phi2 |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) |
(sin (* 1/2 phi1)) |
(sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) |
(sin (* 1/2 phi2)) |
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) |
Found 18 expressions of interest:
| New | Metric | Score | Program |
|---|---|---|---|
| ✓ | accuracy | 99.8% | (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
| ✓ | accuracy | 99.8% | (*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| ✓ | accuracy | 99.7% | (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
| ✓ | accuracy | 99.7% | (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
| ✓ | accuracy | 100.0% | (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
| ✓ | accuracy | 100.0% | (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
| ✓ | accuracy | 99.8% | (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
| ✓ | accuracy | 98.2% | (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
| ✓ | accuracy | 100.0% | (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)) |
| ✓ | accuracy | 100.0% | (-.f64 phi1 phi2) |
| ✓ | accuracy | 100.0% | (-.f64 lambda1 lambda2) |
| ✓ | accuracy | 100.0% | (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
| ✓ | accuracy | 100.0% | (*.f64 phi1 R) |
| ✓ | accuracy | 100.0% | (neg.f64 (*.f64 phi1 R)) |
| ✓ | accuracy | 99.8% | (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) |
| ✓ | accuracy | 99.8% | (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
| ✓ | accuracy | 99.8% | (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
| ✓ | accuracy | 99.6% | (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) |
| 276.0ms | 255× | 0 | valid |
| 3.0ms | 1× | 3 | valid |
Compiled 378 to 44 computations (88.4% saved)
ival-mult: 47.0ms (38.2% of total)ival-cos: 22.0ms (17.9% of total)ival-sin: 21.0ms (17% of total)compiled-spec: 14.0ms (11.4% of total)ival-sub: 5.0ms (4.1% of total)ival-sqrt: 5.0ms (4.1% of total)ival-div: 4.0ms (3.2% of total)ival-add: 3.0ms (2.4% of total)const: 1.0ms (0.8% of total)backward-pass: 1.0ms (0.8% of total)ival-neg: 1.0ms (0.8% of total)| Inputs |
|---|
#<alt (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))> |
#<alt (* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2))))> |
#<alt (* phi1 R)> |
#<alt (neg (* phi1 R))> |
#<alt (* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))))> |
#<alt (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))> |
#<alt (- lambda1 lambda2)> |
#<alt (- phi1 phi2)> |
#<alt (* (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) (* R lambda2))> |
#<alt (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (* 1/2 phi2)> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))> |
#<alt (* (sin (/ phi1 2)) (- lambda1 lambda2))> |
#<alt (* (* -1/2 phi1) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
| Outputs |
|---|
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (- (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* phi2 (- (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))> |
#<alt (* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))> |
#<alt (* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))> |
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (- (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* phi1 (- (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))> |
#<alt (+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (* R (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))> |
#<alt (+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (* (* R (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))))> |
#<alt (+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (* (* R (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))))> |
#<alt (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)))> |
#<alt (* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1))))> |
#<alt (* lambda1 (+ (* -1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* (pow lambda1 3) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)))))> |
#<alt (* -1 (* R (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* lambda1 (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))> |
#<alt (+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (* R (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))> |
#<alt (+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (* (* R (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))> |
#<alt (+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* (* R (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))))> |
#<alt (* R (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* lambda2 (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)))> |
#<alt (* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2))))> |
#<alt (* lambda2 (+ (* -1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (pow lambda2 3) (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)))))> |
#<alt (* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))> |
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))> |
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt (* R phi1)> |
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)))))> |
#<alt (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))> |
#<alt (+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))> |
#<alt (+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))> |
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (pow lambda1 3) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))> |
#<alt (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))> |
#<alt (+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))> |
#<alt (+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))))> |
#<alt (+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))))> |
#<alt (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))> |
#<alt (* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))> |
#<alt (* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1/2 (/ (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (pow lambda2 3) (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))> |
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (- (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (/ (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))> |
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))))> |
#<alt (* -1 phi1)> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)))))> |
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (+ (* -1/8 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))> |
#<alt (+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/384 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))))> |
#<alt (+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))))))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1))))> |
#<alt (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))> |
#<alt (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))> |
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))> |
#<alt (+ (* -1/8 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/384 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))))> |
#<alt (+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))))))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* R phi1)> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* R phi1))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))> |
#<alt (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R lambda1)> |
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))> |
#<alt (* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2))))))> |
#<alt (* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)))))))> |
#<alt (* -1 (* R lambda1))> |
#<alt (* -1 (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda1)) (* R lambda2)) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)) (* R lambda2)) lambda1)))))> |
#<alt (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))> |
#<alt (+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))> |
#<alt (+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))))> |
#<alt (* R lambda2)> |
#<alt (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2))))> |
#<alt (* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2))))))> |
#<alt (* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)))))))> |
#<alt (* -1 (* R lambda2))> |
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda2)) (* R lambda1)) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2))) lambda2)) (* R lambda1)) lambda2)))))> |
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))> |
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))> |
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))> |
#<alt (* R phi1)> |
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))> |
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))> |
#<alt (* -1 (* R phi1))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))> |
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)) (* R phi2)) phi1)))))> |
#<alt (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))> |
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))> |
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))> |
#<alt (* R phi2)> |
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))> |
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))> |
#<alt (* -1 (* R phi2))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi2)) (* R phi1)) phi2)))))> |
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) phi2))) phi2)) (* R phi1)) phi2)))))> |
#<alt (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt lambda1> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2))))))> |
#<alt (* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))> |
#<alt (* -1 lambda1)> |
#<alt (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))> |
#<alt (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda1))) lambda1)))))> |
#<alt (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1)) (* 1/2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)))))> |
#<alt (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))> |
#<alt (+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))> |
#<alt (+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))> |
#<alt (+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))))))))> |
#<alt lambda2> |
#<alt (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))> |
#<alt (* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2))))))> |
#<alt (* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))> |
#<alt (* -1 lambda2)> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda2))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2)) (* 1/2 (pow (- phi1 phi2) 2))) lambda2))) lambda2)))))> |
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))> |
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))> |
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))> |
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2)))))))> |
#<alt (* -1 phi1)> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))) phi1)))))> |
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) phi1)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)))))> |
#<alt (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))> |
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))> |
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))> |
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))> |
#<alt phi2> |
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2))))))> |
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2)))))))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi2))) phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) phi2)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi2))) phi2)))))> |
#<alt (* -1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt (- lambda1 lambda2)> |
#<alt lambda1> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))> |
#<alt lambda1> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))> |
#<alt lambda1> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (+ lambda1 (* -1 lambda2))> |
#<alt (* -1 lambda2)> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))> |
#<alt (* -1 lambda2)> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))> |
#<alt (* -1 phi2)> |
#<alt (- phi1 phi2)> |
#<alt (- phi1 phi2)> |
#<alt (- phi1 phi2)> |
#<alt phi1> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))> |
#<alt phi1> |
#<alt (* -1 (* phi1 (- (/ phi2 phi1) 1)))> |
#<alt (* -1 (* phi1 (- (/ phi2 phi1) 1)))> |
#<alt (* -1 (* phi1 (- (/ phi2 phi1) 1)))> |
#<alt phi1> |
#<alt (+ phi1 (* -1 phi2))> |
#<alt (+ phi1 (* -1 phi2))> |
#<alt (+ phi1 (* -1 phi2))> |
#<alt (* -1 phi2)> |
#<alt (* phi2 (- (/ phi1 phi2) 1))> |
#<alt (* phi2 (- (/ phi1 phi2) 1))> |
#<alt (* phi2 (- (/ phi1 phi2) 1))> |
#<alt (* -1 phi2)> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))> |
#<alt (* R lambda2)> |
#<alt (+ (* -1/4 (* R (* lambda2 (* phi1 phi2)))) (* R lambda2))> |
#<alt (+ (* R lambda2) (* phi2 (+ (* -1/4 (* R (* lambda2 phi1))) (* -1/8 (* R (* lambda2 phi2))))))> |
#<alt (+ (* R lambda2) (* phi2 (+ (* -1/4 (* R (* lambda2 phi1))) (* phi2 (+ (* -1/8 (* R lambda2)) (* 1/96 (* R (* lambda2 (* phi1 phi2)))))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)))> |
#<alt (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/4 (* phi1 phi2)))> |
#<alt (+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2))))> |
#<alt (+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1)))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt 1> |
#<alt (+ 1 (* -1/8 (pow phi2 2)))> |
#<alt (+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8)))> |
#<alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8)))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* 1/2 phi2)> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))> |
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (cos (* 1/2 phi2)))> |
#<alt (+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2))))> |
#<alt (+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* -1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))> |
#<alt (+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi2)))) (* 1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (cos (* 1/2 phi1)))> |
#<alt (+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1))))> |
#<alt (+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* -1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))> |
#<alt (+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi1)))) (* 1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (cos (* 1/2 phi2))> |
#<alt (+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))> |
#<alt (+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))> |
#<alt (+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (cos (* 1/2 phi1))> |
#<alt (+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))> |
#<alt (+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))> |
#<alt (+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))> |
#<alt (* 1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))> |
#<alt (* phi2 (+ (* -1/48 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))> |
#<alt (* phi2 (+ (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/3840 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))))> |
#<alt (* phi2 (+ (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/3840 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* 1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))> |
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))> |
#<alt (* phi1 (+ (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/3840 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))))> |
#<alt (* phi1 (+ (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/3840 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))> |
#<alt (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))> |
#<alt (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))> |
#<alt (+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))> |
#<alt (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))> |
#<alt (* 1/2 (* phi1 (- lambda1 lambda2)))> |
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2))))> |
#<alt (* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* 1/3840 (* (pow phi1 2) (- lambda1 lambda2)))))))> |
#<alt (* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2))))))))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* (sin (* 1/2 phi1)) (- lambda1 lambda2))> |
#<alt (* -1 (* lambda2 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* lambda1 (sin (* 1/2 phi1)))> |
#<alt (* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (sin (* 1/2 phi1)))> |
#<alt (* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1))))> |
#<alt (* lambda1 (sin (* 1/2 phi1)))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1))))> |
#<alt (* -1 (* lambda2 (sin (* 1/2 phi1))))> |
#<alt (* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))> |
#<alt (* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))> |
#<alt (* -1 (* lambda2 (sin (* 1/2 phi1))))> |
#<alt (* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/4 (* phi1 phi2))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2)))))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1)))))> |
#<alt (* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2)))))))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* -1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* 1/2 (* phi1 (sin (* 1/2 phi2))))> |
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))> |
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))> |
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* 1/2 (* phi2 (sin (* 1/2 phi1))))> |
#<alt (* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))> |
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))> |
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))> |
192 calls:
| Time | Variable | Point | Expression | |
|---|---|---|---|---|
| 7.0ms | lambda2 | @ | -inf | (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) |
| 6.0ms | lambda1 | @ | -inf | (* (sin (/ phi1 2)) (- lambda1 lambda2)) |
| 3.0ms | lambda1 | @ | 0 | (* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 3.0ms | lambda2 | @ | 0 | (* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 1.0ms | R | @ | 0 | (* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
| 1× | batch-egg-rewrite |
| 2540× | *-lowering-*.f32 |
| 2540× | *-lowering-*.f64 |
| 1796× | /-lowering-/.f32 |
| 1796× | /-lowering-/.f64 |
| 1794× | fma-lowering-fma.f32 |
Useful iterations: 2 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 48 | 274 |
| 1 | 163 | 236 |
| 2 | 578 | 188 |
| 3 | 5336 | 188 |
| 0 | 8044 | 188 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) |
(* R (sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2)))) (- (* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) (* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))) |
(* (cos (/ phi2 2)) (* (- lambda1 lambda2) (cos (/ phi1 2)))) |
(* phi1 R) |
(neg (* phi1 R)) |
(* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))) |
(sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))) |
(- lambda1 lambda2) |
(- phi1 phi2) |
(* (+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) (* R lambda2)) |
(+ (cos (* 1/2 phi2)) (* (* -1/2 phi1) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi2)) |
(* 1/2 phi2) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (sin (/ phi2 2)) (* (sin (/ phi1 2)) (- lambda1 lambda2))) |
(* (sin (/ phi1 2)) (- lambda1 lambda2)) |
(* (* -1/2 phi1) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
| Outputs |
|---|
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(-.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal 0 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 lambda1 lambda2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))))))) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)) |
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (exp.f64 (log.f64 (-.f64 phi1 phi2)))) |
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(hypot.f64 (-.f64 phi1 phi2) (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) |
(hypot.f64 (exp.f64 (log.f64 (-.f64 phi1 phi2))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(hypot.f64 (exp.f64 (log.f64 (-.f64 phi1 phi2))) (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) |
(hypot.f64 (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (-.f64 phi1 phi2)) |
(hypot.f64 (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (exp.f64 (log.f64 (-.f64 phi1 phi2)))) |
(sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
(pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda1 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda1) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda1)) |
(+.f64 (*.f64 (*.f64 lambda1 (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(+.f64 (*.f64 (*.f64 lambda1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal -2 binary64)) |
(/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) #s(literal 2 binary64)) |
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) #s(literal -2 binary64)) |
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1/2 binary64)) |
(*.f64 phi1 R) |
(*.f64 R phi1) |
(+.f64 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) #s(literal 0 binary64)) |
(+.f64 #s(literal 0 binary64) (*.f64 R (-.f64 #s(literal 0 binary64) phi1))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R)) |
(neg.f64 (*.f64 phi1 R)) |
(*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) |
(*.f64 R (-.f64 #s(literal 0 binary64) phi1)) |
(*.f64 (*.f64 phi1 R) #s(literal -1 binary64)) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) R) |
(*.f64 #s(literal -1 binary64) (*.f64 phi1 R)) |
(*.f64 (-.f64 #s(literal 0 binary64) R) phi1) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)) R) |
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) |
(hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)) |
(hypot.f64 (-.f64 lambda1 lambda2) (exp.f64 (log.f64 (-.f64 phi1 phi2)))) |
(hypot.f64 (-.f64 phi1 phi2) (-.f64 lambda1 lambda2)) |
(hypot.f64 (-.f64 phi1 phi2) (exp.f64 (log.f64 (-.f64 lambda1 lambda2)))) |
(hypot.f64 (exp.f64 (log.f64 (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)) |
(hypot.f64 (exp.f64 (log.f64 (-.f64 lambda1 lambda2))) (exp.f64 (log.f64 (-.f64 phi1 phi2)))) |
(hypot.f64 (exp.f64 (log.f64 (-.f64 phi1 phi2))) (-.f64 lambda1 lambda2)) |
(hypot.f64 (exp.f64 (log.f64 (-.f64 phi1 phi2))) (exp.f64 (log.f64 (-.f64 lambda1 lambda2)))) |
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) |
(pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64)) |
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)) |
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)) |
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1) |
(-.f64 lambda1 lambda2) |
(-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1)) |
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2) |
(fma.f64 #s(literal -1 binary64) lambda2 lambda1) |
(+.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)) |
(+.f64 (-.f64 #s(literal 0 binary64) phi2) phi1) |
(-.f64 phi1 phi2) |
(-.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 0 binary64) phi1)) |
(-.f64 #s(literal 0 binary64) (-.f64 phi2 phi1)) |
(-.f64 (+.f64 phi1 #s(literal 0 binary64)) phi2) |
(fma.f64 phi2 #s(literal -1 binary64) phi1) |
(fma.f64 #s(literal 1 binary64) phi1 (-.f64 #s(literal 0 binary64) phi2)) |
(fma.f64 #s(literal -1 binary64) phi2 phi1) |
(fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi2)) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R)) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 lambda2 R))) |
(+.f64 (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 lambda2 R)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 lambda2 R))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 lambda2 R) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) |
(fma.f64 (*.f64 lambda2 R) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 lambda2 R))) |
(fma.f64 (*.f64 lambda2 R) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 lambda2 R))) |
(*.f64 lambda2 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(*.f64 R (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) (*.f64 lambda2 R)) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) |
(*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2) |
(*.f64 (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) R) |
(+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 phi1 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64)) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -1/2 binary64) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (/.f64 phi1 #s(literal -2 binary64)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(fma.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) phi1 (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(cos.f64 (/.f64 phi2 #s(literal 2 binary64))) |
(cos.f64 (/.f64 phi2 #s(literal -2 binary64))) |
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) phi2)) #s(literal -1 binary64))) |
(-.f64 #s(literal 0 binary64) (/.f64 phi2 #s(literal -2 binary64))) |
(neg.f64 (/.f64 phi2 #s(literal -2 binary64))) |
(/.f64 phi2 #s(literal 2 binary64)) |
(/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) phi2)) |
(/.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) phi2)) |
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -2 binary64) phi2)) |
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -2 binary64)) |
(pow.f64 (/.f64 #s(literal 2 binary64) phi2) #s(literal -1 binary64)) |
(*.f64 phi2 #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) phi2) #s(literal -1 binary64))) |
(*.f64 (/.f64 phi2 #s(literal 2 binary64)) #s(literal 1 binary64)) |
(*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) phi2)) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal -1/2 binary64)) |
(*.f64 #s(literal 1 binary64) (/.f64 phi2 #s(literal 2 binary64))) |
(*.f64 #s(literal -1 binary64) (/.f64 phi2 #s(literal -2 binary64))) |
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1/2 binary64)) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 lambda2 R))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (*.f64 lambda2 R) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 lambda2 R))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 lambda2 R))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R))) (*.f64 (*.f64 lambda2 R) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 lambda2 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 R (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 lambda2 R) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(fma.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 lambda2 R) (*.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 lambda2 R)))) |
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R) (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) R (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) lambda2 (*.f64 (*.f64 lambda2 R) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 2 binary64)) |
(/.f64 (*.f64 (*.f64 lambda2 R) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 lambda2 R)) #s(literal 2 binary64)) |
(/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 lambda2 R)) #s(literal 4 binary64)) |
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 R)) |
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) R) |
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) lambda2) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 lambda2 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) lambda2)) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) (*.f64 lambda2 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) (*.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) lambda2)) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) (+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) (*.f64 lambda2 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda2)) |
(fma.f64 lambda2 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(fma.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda2 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) lambda2 (*.f64 lambda2 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (*.f64 lambda2 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 2 binary64)) |
(/.f64 (*.f64 lambda2 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) lambda2) #s(literal 2 binary64)) |
(/.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) lambda2) #s(literal 4 binary64)) |
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) lambda2) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) |
(+.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(+.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(-.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -2 binary64))) |
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 4 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 4 binary64))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(-.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) #s(literal 0 binary64)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64)) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1/2 binary64) (neg.f64 (-.f64 (-.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))))) |
(/.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64)) |
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -2 binary64)) |
(/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 #s(literal -2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal -4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 4 binary64)) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64))) |
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -2 binary64))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -4 binary64)) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -2 binary64)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) #s(literal -4 binary64)) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) |
(*.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/2 binary64)) |
(*.f64 (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 #s(literal -2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/4 binary64)) |
(neg.f64 (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -2 binary64))) |
(/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -2 binary64)) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (-.f64 (/.f64 phi2 #s(literal -2 binary64)) (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 phi2 #s(literal -2 binary64)) (/.f64 phi1 #s(literal -2 binary64)))) (cos.f64 (-.f64 (/.f64 phi2 #s(literal -2 binary64)) (/.f64 phi1 #s(literal -2 binary64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 phi1 #s(literal -2 binary64)) (/.f64 phi2 #s(literal 2 binary64)))) (cos.f64 (-.f64 (/.f64 phi1 #s(literal -2 binary64)) (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 2 binary64)) |
(/.f64 (+.f64 (cos.f64 (+.f64 (/.f64 phi1 #s(literal -2 binary64)) (/.f64 phi2 #s(literal -2 binary64)))) (cos.f64 (-.f64 (/.f64 phi1 #s(literal -2 binary64)) (/.f64 phi2 #s(literal -2 binary64))))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64))) (cos.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 #s(literal 1/2 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) |
(*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1/2 binary64)) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(+.f64 (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(-.f64 (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 lambda2 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(-.f64 (*.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda2)) |
(fma.f64 lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(fma.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) lambda1 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) |
(/.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 2 binary64)) |
(/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -2 binary64)) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal -2 binary64)) |
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (-.f64 lambda1 lambda2)) #s(literal -2 binary64)) |
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 lambda1 lambda2)) |
(*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) |
(*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (/.f64 (-.f64 lambda1 lambda2) #s(literal 2 binary64))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 1/2 binary64)) |
(+.f64 (*.f64 lambda1 (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(+.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 lambda1 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 lambda1 (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 lambda2 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(-.f64 (*.f64 lambda1 (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda2)) |
(fma.f64 lambda1 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(fma.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) lambda1 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) |
(*.f64 phi1 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))) |
(*.f64 (*.f64 phi1 (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) |
(*.f64 (/.f64 phi1 #s(literal -2 binary64)) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) phi1) |
(+.f64 (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) |
(-.f64 (/.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))) |
(fma.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1/2 binary64) (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))) |
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64)) |
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal 1 binary64))) |
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) |
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -2 binary64)) |
(/.f64 (-.f64 (*.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 4 binary64)) |
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))) #s(literal 2 binary64)) |
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) #s(literal -1 binary64)) |
(*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))) |
(*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) |
(*.f64 (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1/2 binary64)) |
(*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 1/2 binary64))) |
(*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (-.f64 phi1 phi2) (+.f64 phi2 phi1))) #s(literal 2 binary64))) (sin.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 phi2 phi1) (-.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 2 binary64))) |
(*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (cos.f64 (/.f64 (-.f64 phi1 phi2) #s(literal 2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -1/2 binary64)) |
| 1× | egg-herbie |
| 7654× | *-lowering-*.f32 |
| 7654× | *-lowering-*.f64 |
| 2976× | +-lowering-+.f64 |
| 2976× | +-lowering-+.f32 |
| 1802× | *-commutative |
Useful iterations: 1 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1611 | 20950 |
| 1 | 5765 | 19161 |
| 0 | 8209 | 19161 |
| 1× | iter limit |
| 1× | node limit |
| Inputs |
|---|
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (- (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* phi2 (- (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (- (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* phi1 (- (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2))))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (* R (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (* (* R (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (* (* R (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) |
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1))) |
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)))) |
(* lambda1 (+ (* -1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* (pow lambda1 3) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1))))) |
(* -1 (* R (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* lambda1 (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (* R (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (* (* R (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* (* R (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) |
(* R (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* lambda2 (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2))) |
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)))) |
(* lambda2 (+ (* -1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (pow lambda2 3) (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2))))) |
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(* R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))) |
(* -1 (* R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2))))) |
(sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (pow lambda1 3) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))) |
(* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1/2 (/ (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (pow lambda2 3) (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (/ (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))) |
(* -1 phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1))))) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(+ (* -1/8 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/384 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(+ (* -1/8 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/384 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* R phi1) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* -1 (* R phi1)) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))))))) |
(* R lambda1) |
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1)))) |
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)))))) |
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2))))))) |
(* -1 (* R lambda1)) |
(* -1 (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))) |
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda1)) (* R lambda2)) lambda1))))) |
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)) (* R lambda2)) lambda1))))) |
(* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) |
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) |
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))))) |
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))))))) |
(* R lambda2) |
(* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))) |
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)))))) |
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2))))))) |
(* -1 (* R lambda2)) |
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2))))) |
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda2)) (* R lambda1)) lambda2))))) |
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2))) lambda2)) (* R lambda1)) lambda2))))) |
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) |
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) |
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))))) |
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))))))) |
(* R phi1) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(* -1 (* R phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1))))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)) (* R phi2)) phi1))))) |
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) |
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))))) |
(* R phi2) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(* -1 (* R phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi2)) (* R phi1)) phi2))))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) phi2))) phi2)) (* R phi1)) phi2))))) |
(sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3)))))))))) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))) |
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2))))))) |
(* -1 lambda1) |
(* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))) |
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda1))) lambda1))))) |
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1)) (* 1/2 (pow (- phi1 phi2) 2))) lambda1))) lambda1))))) |
(sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) |
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) |
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))))) |
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3)))))))))) |
lambda2 |
(* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))) |
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))) |
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2))))))) |
(* -1 lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda2))) lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2)) (* 1/2 (pow (- phi1 phi2) 2))) lambda2))) lambda2))))) |
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) |
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) |
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))))) |
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3)))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2)))))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))) |
(* -1 phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))) phi1))))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) phi1)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi1))) phi1))))) |
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3)))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2)))))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2))))))) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi2))) phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) phi2)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi2))) phi2))))) |
(* -1 lambda2) |
(- lambda1 lambda2) |
(- lambda1 lambda2) |
(- lambda1 lambda2) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
lambda1 |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
lambda1 |
(+ lambda1 (* -1 lambda2)) |
(+ lambda1 (* -1 lambda2)) |
(+ lambda1 (* -1 lambda2)) |
(* -1 lambda2) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(* -1 lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(* -1 phi2) |
(- phi1 phi2) |
(- phi1 phi2) |
(- phi1 phi2) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
phi1 |
(* -1 (* phi1 (- (/ phi2 phi1) 1))) |
(* -1 (* phi1 (- (/ phi2 phi1) 1))) |
(* -1 (* phi1 (- (/ phi2 phi1) 1))) |
phi1 |
(+ phi1 (* -1 phi2)) |
(+ phi1 (* -1 phi2)) |
(+ phi1 (* -1 phi2)) |
(* -1 phi2) |
(* phi2 (- (/ phi1 phi2) 1)) |
(* phi2 (- (/ phi1 phi2) 1)) |
(* phi2 (- (/ phi1 phi2) 1)) |
(* -1 phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(* R lambda2) |
(+ (* -1/4 (* R (* lambda2 (* phi1 phi2)))) (* R lambda2)) |
(+ (* R lambda2) (* phi2 (+ (* -1/4 (* R (* lambda2 phi1))) (* -1/8 (* R (* lambda2 phi2)))))) |
(+ (* R lambda2) (* phi2 (+ (* -1/4 (* R (* lambda2 phi1))) (* phi2 (+ (* -1/8 (* R lambda2)) (* 1/96 (* R (* lambda2 (* phi1 phi2))))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))) |
(* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))) |
(* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))) |
(* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))) |
(* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))) |
(* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
1 |
(+ 1 (* -1/4 (* phi1 phi2))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2)))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
1 |
(+ 1 (* -1/8 (pow phi2 2))) |
(+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8))) |
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8))) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(cos (* 1/2 phi2)) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* 1/2 phi2) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (cos (* 1/2 phi1)))) |
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (cos (* 1/2 phi2))) |
(+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) |
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* -1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))) |
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi2)))) (* 1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (cos (* 1/2 phi1))) |
(+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) |
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* -1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))) |
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi1)))) (* 1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(cos (* 1/2 phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2))))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2))))))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2)))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(cos (* 1/2 phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1))))))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1)))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(* 1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) |
(* phi2 (+ (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/3840 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) |
(* phi2 (+ (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/3840 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* 1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) |
(* phi1 (+ (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/3840 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) |
(* phi1 (+ (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/3840 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))) |
(* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))) |
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))) |
(* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(* 1/2 (* phi1 (- lambda1 lambda2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2)))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* 1/3840 (* (pow phi1 2) (- lambda1 lambda2))))))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))))))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/4 (* phi1 phi2)) |
(* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2))))))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* 1/2 (* phi1 (sin (* 1/2 phi2)))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2)))))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* 1/2 (* phi2 (sin (* 1/2 phi1)))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1)))))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1))))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
| Outputs |
|---|
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* phi2 (- (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi2 #s(literal -1/8 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(+ (* phi2 (- (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+.f64 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+.f64 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(+.f64 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)))) |
(* -1 (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(+.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* phi1 (- (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* phi1 (- (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) |
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 phi2 R) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 (*.f64 phi2 R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))))))) |
(* R phi2) |
(*.f64 phi2 R) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 R (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi1 R) phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 R (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi2 phi2))))))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 R)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 phi1 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 phi1 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (/.f64 (*.f64 R (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi2))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (* R (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) |
(+.f64 (*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (* (* R (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda1 R) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 R (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (* (* R (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 R (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (*.f64 lambda1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))))))) |
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1))) |
(*.f64 lambda1 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) lambda1))) |
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)))) |
(*.f64 lambda1 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R)) (/.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) lambda1))) |
(* lambda1 (+ (* -1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* (pow lambda1 3) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1))))) |
(*.f64 lambda1 (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R)) (/.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) lambda1)) (*.f64 (/.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 R (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda1 (*.f64 lambda1 lambda1)))))) |
(* -1 (* R (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (/ (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (* lambda1 (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1)) (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(*.f64 (-.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (*.f64 lambda1 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) |
(*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (* R (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 (*.f64 R (*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (* (* R (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda2 R) (-.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))) |
(+ (* R (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* (* R (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) |
(+.f64 (*.f64 R (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (*.f64 lambda2 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (*.f64 lambda2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 lambda2 R) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))))))) |
(* R (* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2))) |
(*.f64 lambda2 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))) |
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)))) |
(*.f64 lambda2 (+.f64 (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) |
(* lambda2 (+ (* -1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (pow lambda2 3) (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (+ (* R (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2))))) |
(*.f64 lambda2 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (+.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (+.f64 (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (-.f64 (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) |
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 phi1 R) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (*.f64 phi1 R) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) |
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (*.f64 phi1 R) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))) |
(* R phi1) |
(*.f64 phi1 R) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 phi2 R) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 phi2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 phi2 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 phi2 R) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) |
(sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi2 phi2)))))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi2)) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi2)) phi2))) |
(sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) |
(hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) |
(+.f64 (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(+.f64 (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) 2)))) (* (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) |
(+.f64 (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda1 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (*.f64 lambda1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))))))) |
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)))) |
(* lambda1 (- (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (pow lambda1 3) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 (*.f64 lambda1 lambda1))))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)))) |
(* -1 (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (/ (- (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (/ (+ (* 1/2 (/ (* (pow (- phi1 phi2) 2) (- (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) lambda1))) (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) |
(*.f64 (+.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (-.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) |
(hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) |
(+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 (*.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))) (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))) |
(+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))) |
(+ (sqrt (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2))))))) (sqrt (/ 1 (pow (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (- (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (/ (* (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)) (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))))))) (* (sqrt (/ 1 (+ (pow (- phi1 phi2) 2) (pow (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (* (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))) |
(+.f64 (hypot.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (*.f64 lambda2 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (*.f64 lambda2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 lambda2 (*.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (-.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))))))) |
(* lambda2 (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* lambda2 (- (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1/2 (/ (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* (pow lambda2 3) (pow (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)))) |
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (- (+ (* -1 (/ (- (+ (* -1 (/ (+ (* 1/2 (/ (* (pow (- phi1 phi2) 2) (- (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) lambda2) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) |
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) |
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))) |
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/24 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* 1/8 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/4 (* (pow (sin (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))))))) |
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (*.f64 phi1 phi1)))))) |
(* -1 phi1) |
(-.f64 #s(literal 0 binary64) phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi1)) phi1))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (- (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) phi1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))) phi1)) phi1))) |
(* (cos (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) |
(+ (* -1/8 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/384 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))) |
(+ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/46080 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal 1/384 binary64))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(-.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(-.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(-.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 (/.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) |
(* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) |
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(-.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(-.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(-.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) |
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* (cos (* 1/2 phi2)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/8 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/384 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi1 phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* (cos (* 1/2 phi2)) (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/384 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))))) |
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/384 binary64))))))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* R phi1) |
(*.f64 phi1 R) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) |
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) (*.f64 (*.f64 R (*.f64 lambda1 lambda2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))) |
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (*.f64 (*.f64 lambda1 R) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (*.f64 lambda2 R))))) |
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 (*.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (*.f64 lambda2 R))))) |
(* R lambda1) |
(*.f64 lambda1 R) |
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1)))) |
(*.f64 lambda1 (-.f64 R (/.f64 (*.f64 lambda2 R) lambda1))) |
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)))))) |
(*.f64 lambda1 (+.f64 R (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) R) lambda1) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1)) (/.f64 (*.f64 lambda2 R) lambda1)))) |
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2))))))) |
(*.f64 lambda1 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (*.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (/.f64 R lambda1)))) (/.f64 (*.f64 lambda2 R) lambda1)))) |
(* -1 (* R lambda1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(* -1 (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 lambda2 R) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda1)) (* R lambda2)) lambda1))))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)) (* R lambda2)) lambda1))))) |
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (/.f64 (*.f64 (*.f64 lambda2 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) |
(-.f64 (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (*.f64 (*.f64 R (*.f64 lambda1 lambda2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))) |
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))) (*.f64 (*.f64 lambda1 R) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))) |
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))))))) |
(+.f64 (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))) (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))))))) (*.f64 (*.f64 lambda1 R) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))) |
(* R lambda2) |
(*.f64 lambda2 R) |
(* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)))))) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))) |
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2))))))) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(* -1 (* R lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda2)) (* R lambda1)) lambda2))))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda1 R) (*.f64 #s(literal -1/2 binary64) (*.f64 R (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2))) lambda2)) (* R lambda1)) lambda2))))) |
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 lambda1 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) |
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) |
(-.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (*.f64 R (*.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) |
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))))) |
(+.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (*.f64 phi1 R) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))) |
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))))))) |
(+.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 (*.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))) (*.f64 (*.f64 phi2 R) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))) |
(* R phi1) |
(*.f64 phi1 R) |
(* phi1 (+ R (* -1 (/ (* R phi2) phi1)))) |
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) |
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 phi2 R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) (/.f64 R phi1)))))) |
(* -1 (* R phi1)) |
(*.f64 phi1 (neg.f64 R)) |
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 phi2 R) (*.f64 #s(literal -1/2 binary64) (*.f64 R (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))) |
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)) (* R phi2)) phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (-.f64 (*.f64 phi2 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 R (*.f64 phi2 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1)))) |
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) |
(-.f64 (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 R (*.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+.f64 (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 (*.f64 phi2 R) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 R) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) |
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))))) |
(+.f64 (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 (*.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))) (*.f64 (*.f64 phi1 R) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) |
(* R phi2) |
(*.f64 phi2 R) |
(* phi2 (+ R (* -1 (/ (* R phi1) phi2)))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) |
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2) (/.f64 R phi2)))) (/.f64 (*.f64 phi1 R) phi2)))) |
(* -1 (* R phi2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 R)) |
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))) |
(*.f64 (-.f64 R (/.f64 (*.f64 phi1 R) phi2)) (-.f64 #s(literal 0 binary64) phi2)) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 phi1 R) (*.f64 #s(literal -1/2 binary64) (*.f64 R (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2))) |
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) phi2))) phi2)) (* R phi1)) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 phi1 R) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 R (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2))) |
(sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) |
(hypot.f64 lambda2 (-.f64 phi1 phi2)) |
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) |
(-.f64 (hypot.f64 lambda2 (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))) |
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (hypot.f64 lambda2 (-.f64 phi1 phi2)) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))) (*.f64 lambda2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))))) |
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (hypot.f64 lambda2 (-.f64 phi1 phi2)) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda2 lambda2) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))))))) (*.f64 lambda2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))))) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))) |
(*.f64 lambda1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) |
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2))))))) |
(*.f64 lambda1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))) (/.f64 lambda2 lambda1)))) |
(* -1 lambda1) |
(-.f64 #s(literal 0 binary64) lambda1) |
(* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda1))) lambda1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1))) |
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1)) (* 1/2 (pow (- phi1 phi2) 2))) lambda1))) lambda1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1))) |
(sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) |
(hypot.f64 lambda1 (-.f64 phi1 phi2)) |
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) |
(-.f64 (hypot.f64 lambda1 (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))) |
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))))) |
(+.f64 (hypot.f64 lambda1 (-.f64 phi1 phi2)) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))))) (*.f64 lambda1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))) |
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3)))))))))) |
(+.f64 (hypot.f64 lambda1 (-.f64 phi1 phi2)) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 lambda1 lambda1) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))))) (*.f64 lambda1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))) |
lambda2 |
(* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))) |
(*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) |
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))) |
(*.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))) |
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2))))))) |
(*.f64 lambda2 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))) (/.f64 lambda1 lambda2)))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda2))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2)) lambda2))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2)) (* 1/2 (pow (- phi1 phi2) 2))) lambda2))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda2)) lambda2))) |
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) |
(hypot.f64 (-.f64 lambda1 lambda2) phi2) |
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) |
(-.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 (*.f64 phi1 phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) |
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))))) |
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))) (*.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))) |
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3)))))))))) |
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))) (*.f64 (*.f64 (*.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))))) (*.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2)))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) |
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))) |
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) |
(* -1 phi1) |
(-.f64 #s(literal 0 binary64) phi1) |
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1))))) |
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))) phi1))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1))) |
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) phi1)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi1))) phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)) phi1)))) |
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) |
(hypot.f64 phi1 (-.f64 lambda1 lambda2)) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) |
(-.f64 (hypot.f64 phi1 (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))))) |
(+.f64 (hypot.f64 phi1 (-.f64 lambda1 lambda2)) (*.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))) (*.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) |
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3)))))))))) |
(+.f64 (hypot.f64 phi1 (-.f64 lambda1 lambda2)) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (*.f64 (*.f64 (*.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))))) (*.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) |
phi2 |
(* phi2 (+ 1 (* -1 (/ phi1 phi2)))) |
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2)))))) |
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) |
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2))))))) |
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (/.f64 phi1 phi2)))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi2)) phi2))) |
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) phi2)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi2))) phi2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
(- lambda1 lambda2) |
(-.f64 lambda1 lambda2) |
lambda1 |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))) |
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1))) |
lambda1 |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)))) |
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)))) |
lambda1 |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(+ lambda1 (* -1 lambda2)) |
(-.f64 lambda1 lambda2) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* lambda2 (- (/ lambda1 lambda2) 1)) |
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) |
(* -1 lambda2) |
(-.f64 #s(literal 0 binary64) lambda2) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
(- phi1 phi2) |
(-.f64 phi1 phi2) |
phi1 |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
(* phi1 (+ 1 (* -1 (/ phi2 phi1)))) |
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) |
phi1 |
(* -1 (* phi1 (- (/ phi2 phi1) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64))) |
(* -1 (* phi1 (- (/ phi2 phi1) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64))) |
(* -1 (* phi1 (- (/ phi2 phi1) 1))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64))) |
phi1 |
(+ phi1 (* -1 phi2)) |
(-.f64 phi1 phi2) |
(+ phi1 (* -1 phi2)) |
(-.f64 phi1 phi2) |
(+ phi1 (* -1 phi2)) |
(-.f64 phi1 phi2) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* phi2 (- (/ phi1 phi2) 1)) |
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))) |
(* phi2 (- (/ phi1 phi2) 1)) |
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))) |
(* phi2 (- (/ phi1 phi2) 1)) |
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))) |
(* -1 phi2) |
(-.f64 #s(literal 0 binary64) phi2) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2))))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(* R lambda2) |
(*.f64 lambda2 R) |
(+ (* -1/4 (* R (* lambda2 (* phi1 phi2)))) (* R lambda2)) |
(+.f64 (*.f64 lambda2 R) (*.f64 (*.f64 #s(literal -1/4 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi2)))) |
(+ (* R lambda2) (* phi2 (+ (* -1/4 (* R (* lambda2 phi1))) (* -1/8 (* R (* lambda2 phi2)))))) |
(+.f64 (*.f64 lambda2 R) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda2 R) phi1)) (*.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 lambda2 phi2)))))) |
(+ (* R lambda2) (* phi2 (+ (* -1/4 (* R (* lambda2 phi1))) (* phi2 (+ (* -1/8 (* R lambda2)) (* 1/96 (* R (* lambda2 (* phi1 phi2))))))))) |
(+.f64 (*.f64 lambda2 R) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 lambda2 R) phi1)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 lambda2 R)) (*.f64 (*.f64 #s(literal 1/96 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi2)))))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) phi1)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2)))))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))))) |
(*.f64 (*.f64 lambda2 R) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/4 (* phi1 phi2))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* -1/8 phi2)))) |
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) |
(+ 1 (* phi2 (+ (* -1/4 phi1) (* phi2 (- (* 1/96 (* phi1 phi2)) 1/8))))) |
(+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (/ (cos (* 1/2 phi2)) phi1))) |
(*.f64 phi1 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
(* -1 (* phi1 (+ (* -1 (/ (cos (* 1/2 phi2)) phi1)) (* 1/2 (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) phi1))) |
1 |
#s(literal 1 binary64) |
(+ 1 (* -1/8 (pow phi2 2))) |
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2))) |
(+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) |
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8))) |
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* 1/2 phi2) |
(*.f64 #s(literal 1/2 binary64) phi2) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (cos (* 1/2 phi2)))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal -1/8 binary64) R) (*.f64 (*.f64 phi1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/48 binary64) R) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (cos (* 1/2 phi1)))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal -1/2 binary64) R) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal -1/8 binary64) R) (*.f64 (*.f64 lambda2 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))) |
(+.f64 (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal 1/48 binary64) R) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (cos (* 1/2 phi2))) |
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* -1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 phi1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi2)))) (* 1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))) |
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 phi1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (cos (* 1/2 phi1))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) |
(+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* -1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 lambda2 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi1)))) (* 1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))) |
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1)))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(cos (* 1/2 phi2)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) |
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/384 binary64))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(cos (* 1/2 phi1)) |
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) |
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1)))))))) |
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/46080 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/384 binary64))))))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* 1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) |
(* phi2 (+ (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/3840 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) |
(* phi2 (+ (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/3840 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi2 phi2)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* 1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(* phi1 (+ (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/3840 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) |
(* phi1 (+ (* 1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/3840 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi1 phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(-.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(-.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(-.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) |
(* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 lambda1 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) |
(* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(-.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(-.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(+ (* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(-.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* -1 (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) |
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))) |
(* -1 (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))) |
(* 1/2 (* phi1 (- lambda1 lambda2))) |
(*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/2 (- lambda1 lambda2)))) |
(*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1)) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* 1/3840 (* (pow phi1 2) (- lambda1 lambda2))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1)) (-.f64 lambda1 lambda2)))))) |
(* phi1 (+ (* 1/2 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/48 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/3840 (- lambda1 lambda2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi1 phi1)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* (sin (* 1/2 phi1)) (- lambda1 lambda2)) |
(*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(-.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(-.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(-.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 lambda1 (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))) |
(* lambda1 (sin (* 1/2 phi1))) |
(*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda1 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda2 (sin (* 1/2 phi1))) lambda1)))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda1 (sin (* 1/2 phi1))) |
(*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(-.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(-.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(+ (* -1 (* lambda2 (sin (* 1/2 phi1)))) (* lambda1 (sin (* 1/2 phi1)))) |
(-.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* lambda2 (+ (* -1 (sin (* 1/2 phi1))) (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))) |
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) |
(* -1 (* lambda2 (sin (* 1/2 phi1)))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* -1 (* lambda2 (+ (sin (* 1/2 phi1)) (* -1 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda1 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/4 (* phi1 phi2)) |
(*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2)) |
(* phi2 (+ (* -1/4 phi1) (* 1/96 (* phi1 (pow phi2 2))))) |
(*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 phi1 (*.f64 phi2 phi2))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* -1/7680 (* phi1 (pow phi2 2))) (* 1/96 phi1))))) |
(*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi2 phi2)) #s(literal -1/7680 binary64)) (*.f64 phi1 #s(literal 1/96 binary64)))))) |
(* phi2 (+ (* -1/4 phi1) (* (pow phi2 2) (+ (* 1/96 phi1) (* (pow phi2 2) (+ (* -1/7680 phi1) (* 1/1290240 (* phi1 (pow phi2 2))))))))) |
(*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 phi1 #s(literal 1/96 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 phi1 #s(literal -1/7680 binary64)) (*.f64 (*.f64 phi1 (*.f64 phi2 phi2)) #s(literal 1/1290240 binary64)))))))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* -1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* 1/2 (* phi1 (sin (* 1/2 phi2)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2)))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2))))))))) |
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* 1/2 (* phi2 (sin (* 1/2 phi1)))) |
(*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1)))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) |
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1))))))))) |
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/3840 binary64)))))))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) |
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
Compiled 47648 to 3724 computations (92.2% saved)
62 alts after pruning (57 fresh and 5 done)
| Pruned | Kept | Total | |
|---|---|---|---|
| New | 1403 | 14 | 1417 |
| Fresh | 12 | 43 | 55 |
| Picked | 2 | 3 | 5 |
| Done | 0 | 2 | 2 |
| Total | 1417 | 62 | 1479 |
| Status | Accuracy | Program |
|---|---|---|
| 16.7% | (-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) | |
| 54.0% | (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) | |
| 24.2% | (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) | |
| 17.5% | (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) | |
| 22.1% | (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) | |
| ✓ | 22.1% | (*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
| 36.4% | (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) | |
| 20.1% | (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) | |
| 41.9% | (*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) | |
| 7.9% | (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 22.0% | (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) | |
| ✓ | 21.3% | (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
| 18.6% | (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) | |
| 10.1% | (*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 19.9% | (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 20.4% | (*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) | |
| 13.2% | (*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) | |
| 13.2% | (*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 9.7% | (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| 11.4% | (*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) | |
| 22.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) | |
| 22.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) | |
| 23.8% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) | |
| 21.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) | |
| 21.5% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) | |
| 22.7% | (*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) | |
| 20.2% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) | |
| 22.0% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) | |
| 21.8% | (*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) | |
| 20.0% | (*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) | |
| 54.9% | (*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) | |
| 41.1% | (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) | |
| 17.5% | (*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) | |
| 17.7% | (*.f64 lambda2 (*.f64 R (+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) | |
| 21.7% | (*.f64 lambda2 R) | |
| 17.2% | (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) | |
| 81.8% | (*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) (-.f64 phi1 phi2))) | |
| 85.3% | (*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) | |
| 89.5% | (*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) | |
| 77.1% | (*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) | |
| 87.6% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 phi1 phi2))) | |
| 94.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) | |
| 81.8% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) | |
| 88.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 41.7% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 88.0% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 89.3% | (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) | |
| 77.1% | (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) | |
| 80.8% | (*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) | |
| 72.1% | (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) | |
| 11.4% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) | |
| 7.9% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) | |
| 43.0% | (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) | |
| 9.6% | (*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) | |
| 22.1% | (*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) | |
| 22.0% | (*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) | |
| 50.7% | (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) | |
| ✓ | 22.1% | (*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
| 39.1% | (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) | |
| ✓ | 31.8% | (*.f64 R phi2) |
| 10.7% | (neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) | |
| ✓ | 29.8% | (neg.f64 (*.f64 phi1 R)) |
Compiled 3848 to 1446 computations (62.4% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64))))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 lambda2 (*.f64 R (+.f64 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) #s(literal 1 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
9 calls:
| 78.0ms | phi2 |
| 59.0ms | phi1 |
| 52.0ms | lambda2 |
| 36.0ms | (-.f64 lambda1 lambda2) |
| 34.0ms | lambda1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 99.8% | 1 | R |
| 99.8% | 1 | lambda1 |
| 99.8% | 1 | lambda2 |
| 99.8% | 1 | phi1 |
| 99.8% | 1 | phi2 |
| 99.8% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 99.8% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 99.8% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 99.8% | 1 | (-.f64 lambda1 lambda2) |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
9 calls:
| 63.0ms | (-.f64 lambda1 lambda2) |
| 51.0ms | lambda1 |
| 42.0ms | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 39.0ms | phi1 |
| 31.0ms | lambda2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 99.8% | 1 | R |
| 99.8% | 1 | lambda1 |
| 99.8% | 1 | lambda2 |
| 99.8% | 1 | phi1 |
| 99.8% | 1 | phi2 |
| 99.8% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 99.8% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 99.8% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 99.8% | 1 | (-.f64 lambda1 lambda2) |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
9 calls:
| 85.0ms | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 52.0ms | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 49.0ms | phi1 |
| 42.0ms | lambda2 |
| 38.0ms | R |
| Accuracy | Segments | Branch |
|---|---|---|
| 99.8% | 1 | R |
| 99.8% | 1 | lambda1 |
| 99.8% | 1 | lambda2 |
| 99.8% | 1 | phi1 |
| 99.8% | 1 | phi2 |
| 99.8% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 99.8% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 99.8% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 99.8% | 1 | (-.f64 lambda1 lambda2) |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (cos.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))) (*.f64 (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64))) (sin.f64 (/.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)) #s(literal -2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 lambda1 (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
9 calls:
| 56.0ms | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 46.0ms | phi2 |
| 44.0ms | lambda2 |
| 32.0ms | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 31.0ms | (-.f64 lambda1 lambda2) |
| Accuracy | Segments | Branch |
|---|---|---|
| 99.8% | 1 | R |
| 99.8% | 1 | lambda1 |
| 99.8% | 1 | lambda2 |
| 99.8% | 1 | phi1 |
| 99.8% | 1 | phi2 |
| 99.8% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 99.8% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 99.8% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 99.8% | 1 | (-.f64 lambda1 lambda2) |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 lambda2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
9 calls:
| 61.0ms | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 51.0ms | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 45.0ms | phi2 |
| 41.0ms | (-.f64 lambda1 lambda2) |
| 35.0ms | phi1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 99.8% | 1 | R |
| 99.8% | 1 | lambda1 |
| 99.8% | 1 | lambda2 |
| 99.8% | 1 | phi1 |
| 99.8% | 1 | phi2 |
| 99.8% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 99.8% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 99.8% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 99.8% | 1 | (-.f64 lambda1 lambda2) |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) |
9 calls:
| 213.0ms | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 103.0ms | phi2 |
| 79.0ms | lambda1 |
| 72.0ms | phi1 |
| 47.0ms | R |
| Accuracy | Segments | Branch |
|---|---|---|
| 94.4% | 1 | R |
| 96.1% | 2 | lambda2 |
| 94.4% | 1 | phi1 |
| 94.4% | 1 | phi2 |
| 94.4% | 1 | (-.f64 lambda1 lambda2) |
| 94.4% | 1 | lambda1 |
| 94.4% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 94.4% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 94.4% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 R lambda2)) |
(neg.f64 (*.f64 (*.f64 R (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (*.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 phi1 #s(literal -2 binary64))))) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) phi1)) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 R) (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))) |
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))) |
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1)) |
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (exp.f64 (log.f64 (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 R (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 R) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) R) |
(*.f64 (*.f64 lambda2 R) (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (neg.f64 lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) |
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))) |
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))) |
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 (cos.f64 (/.f64 (-.f64 phi2 phi1) #s(literal 2 binary64))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))) (*.f64 R lambda2)) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
9 calls:
| 49.0ms | phi1 |
| 44.0ms | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 41.0ms | lambda1 |
| 38.0ms | (-.f64 lambda1 lambda2) |
| 37.0ms | R |
| Accuracy | Segments | Branch |
|---|---|---|
| 94.4% | 1 | R |
| 94.4% | 1 | lambda1 |
| 94.4% | 1 | phi1 |
| 94.4% | 1 | phi2 |
| 94.4% | 1 | (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) |
| 94.4% | 1 | (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) |
| 94.4% | 1 | (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) |
| 94.4% | 1 | (-.f64 lambda1 lambda2) |
| 94.4% | 1 | lambda2 |
Compiled 144 to 79 computations (45.1% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
6 calls:
| 35.0ms | lambda2 |
| 15.0ms | phi2 |
| 14.0ms | phi1 |
| 14.0ms | (-.f64 lambda1 lambda2) |
| 14.0ms | lambda1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 89.3% | 1 | R |
| 89.3% | 1 | lambda1 |
| 89.3% | 1 | lambda2 |
| 94.4% | 2 | phi1 |
| 94.4% | 2 | phi2 |
| 89.3% | 1 | (-.f64 lambda1 lambda2) |
Compiled 38 to 31 computations (18.4% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
4 calls:
| 25.0ms | lambda1 |
| 19.0ms | phi1 |
| 14.0ms | phi2 |
| 14.0ms | lambda2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 89.3% | 1 | lambda1 |
| 89.3% | 1 | lambda2 |
| 89.3% | 1 | phi1 |
| 89.3% | 1 | phi2 |
Compiled 24 to 20 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) |
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) |
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) |
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) |
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) |
(*.f64 (cos.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 4 binary64) (+.f64 phi2 phi1)))) (*.f64 R lambda2)) |
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) |
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) |
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 phi2 (/.f64 #s(literal 2 binary64) phi1))) (/.f64 #s(literal 4 binary64) phi1)))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
6 calls:
| 27.0ms | R |
| 20.0ms | lambda1 |
| 18.0ms | (-.f64 lambda1 lambda2) |
| 14.0ms | lambda2 |
| 14.0ms | phi2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 83.1% | 1 | R |
| 83.1% | 1 | phi1 |
| 83.1% | 1 | (-.f64 lambda1 lambda2) |
| 83.1% | 1 | lambda1 |
| 83.1% | 1 | lambda2 |
| 83.1% | 1 | phi2 |
Compiled 38 to 31 computations (18.4% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) |
(*.f64 (*.f64 lambda2 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
6 calls:
| 32.0ms | phi2 |
| 24.0ms | (-.f64 lambda1 lambda2) |
| 9.0ms | R |
| 9.0ms | lambda2 |
| 9.0ms | phi1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 72.1% | 1 | R |
| 77.6% | 2 | lambda2 |
| 76.6% | 2 | (-.f64 lambda1 lambda2) |
| 75.9% | 3 | phi1 |
| 72.1% | 1 | lambda1 |
| 80.4% | 2 | phi2 |
Compiled 38 to 31 computations (18.4% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
| Outputs |
|---|
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
2 calls:
| 26.0ms | lambda2 |
| 7.0ms | phi2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 76.0% | 2 | lambda2 |
| 72.1% | 1 | phi2 |
Compiled 12 to 10 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/96 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 lambda2 R)))))) (*.f64 lambda2 R)) |
(*.f64 lambda2 (+.f64 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 lambda1 R) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))) |
| Outputs |
|---|
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) |
(*.f64 R phi2) |
5 calls:
| 13.0ms | lambda1 |
| 7.0ms | phi2 |
| 7.0ms | R |
| 7.0ms | phi1 |
| 7.0ms | lambda2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 58.5% | 2 | R |
| 63.9% | 2 | lambda1 |
| 66.4% | 3 | phi2 |
| 68.4% | 3 | phi1 |
| 63.1% | 3 | lambda2 |
Compiled 30 to 25 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64)))))))) |
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 phi1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi2)) #s(literal -1/96 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))) lambda2)) |
| Outputs |
|---|
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) |
(*.f64 R phi2) |
1 calls:
| 6.0ms | phi1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 68.3% | 3 | phi1 |
Compiled 6 to 5 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 phi2 R) phi1)))) |
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))) (*.f64 R lambda2)) |
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1 binary64) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -1/4 binary64)) (*.f64 phi2 #s(literal -1/8 binary64))))))) |
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 R (*.f64 lambda2 phi2))) (*.f64 #s(literal 1/4 binary64) (*.f64 R (*.f64 phi1 lambda2))))) (*.f64 lambda2 R)) |
| Outputs |
|---|
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 R phi2) |
1 calls:
| 27.0ms | phi1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 66.4% | 3 | phi1 |
Compiled 6 to 5 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) |
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 phi1 R) phi2))) |
(*.f64 R (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 lambda2 (*.f64 phi1 phi2))) lambda2)) |
| Outputs |
|---|
(neg.f64 (*.f64 phi1 R)) |
(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
2 calls:
| 4.0ms | phi2 |
| 4.0ms | phi1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 66.4% | 3 | phi2 |
| 64.9% | 3 | phi1 |
Compiled 12 to 10 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
| Outputs |
|---|
(neg.f64 (*.f64 phi1 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) |
1 calls:
| 3.0ms | phi2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 65.8% | 3 | phi2 |
Compiled 6 to 5 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
| Outputs |
|---|
(neg.f64 (*.f64 phi1 R)) |
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) |
(*.f64 R phi2) |
4 calls:
| 3.0ms | phi2 |
| 3.0ms | phi1 |
| 3.0ms | lambda1 |
| 3.0ms | lambda2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 48.2% | 4 | lambda2 |
| 62.1% | 3 | phi1 |
| 50.8% | 4 | lambda1 |
| 62.8% | 3 | phi2 |
Compiled 24 to 20 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 R)) |
| Outputs |
|---|
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) |
(*.f64 R phi2) |
3 calls:
| 3.0ms | R |
| 3.0ms | phi2 |
| 3.0ms | phi1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 36.7% | 3 | R |
| 55.0% | 3 | phi1 |
| 58.6% | 6 | phi2 |
Compiled 18 to 15 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
(neg.f64 (*.f64 phi1 R)) |
(-.f64 #s(literal 0 binary64) (*.f64 R phi1)) |
| Outputs |
|---|
(neg.f64 (*.f64 phi1 R)) |
(*.f64 R phi2) |
2 calls:
| 2.0ms | phi1 |
| 2.0ms | phi2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 52.0% | 2 | phi2 |
| 52.9% | 3 | phi1 |
Compiled 12 to 10 computations (16.7% saved)
| Inputs |
|---|
(*.f64 R phi2) |
(*.f64 lambda2 R) |
| Outputs |
|---|
(*.f64 lambda2 R) |
(*.f64 R phi2) |
3 calls:
| 2.0ms | phi1 |
| 2.0ms | phi2 |
| 2.0ms | lambda1 |
| Accuracy | Segments | Branch |
|---|---|---|
| 35.2% | 2 | lambda1 |
| 35.7% | 3 | phi1 |
| 45.6% | 2 | phi2 |
Compiled 18 to 15 computations (16.7% saved)
Total -0.0b remaining (-0%)
Threshold costs -0b (-0%)
| Inputs |
|---|
(*.f64 R phi2) |
| Outputs |
|---|
(*.f64 R phi2) |
5 calls:
| 1.0ms | phi1 |
| 1.0ms | phi2 |
| 1.0ms | lambda1 |
| 1.0ms | R |
| 1.0ms | lambda2 |
| Accuracy | Segments | Branch |
|---|---|---|
| 31.8% | 1 | phi1 |
| 31.8% | 1 | R |
| 31.8% | 1 | lambda1 |
| 31.8% | 1 | lambda2 |
| 31.8% | 1 | phi2 |
Compiled 30 to 25 computations (16.7% saved)
| 1× | binary-search |
| 1× | predicate-same |
| Time | Left | Right |
|---|---|---|
| 42.0ms | 5.668950601990176e+180 | 2.5268163649798557e+182 |
| 12.0ms | 40× | 1 | valid |
| 9.0ms | 72× | 0 | valid |
Compiled 430 to 269 computations (37.4% saved)
ival-mult: 4.0ms (29.2% of total)ival-cos: 3.0ms (21.9% of total)ival-sub: 2.0ms (14.6% of total)ival-add: 1.0ms (7.3% of total)ival-div: 1.0ms (7.3% of total)ival-sqrt: 1.0ms (7.3% of total)backward-pass: 1.0ms (7.3% of total)const: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 40.0ms | 0.05153405420728693 | 0.9229724798875549 |
| 28.0ms | 87× | 0 | valid |
| 7.0ms | 25× | 1 | valid |
Compiled 325 to 220 computations (32.3% saved)
ival-mult: 21.0ms (71.8% of total)ival-sub: 2.0ms (6.8% of total)ival-cos: 2.0ms (6.8% of total)ival-add: 1.0ms (3.4% of total)ival-div: 1.0ms (3.4% of total)ival-sqrt: 1.0ms (3.4% of total)backward-pass: 1.0ms (3.4% of total)const: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 16.0ms | 1.7207596964009822e+23 | 2.515632587128384e+23 |
| 10.0ms | 32× | 1 | valid |
| 4.0ms | 32× | 0 | valid |
Compiled 149 to 96 computations (35.6% saved)
ival-cos: 3.0ms (31.1% of total)ival-mult: 3.0ms (31.1% of total)ival-add: 1.0ms (10.4% of total)ival-div: 1.0ms (10.4% of total)ival-sub: 1.0ms (10.4% of total)ival-sqrt: 1.0ms (10.4% of total)backward-pass: 1.0ms (10.4% of total)const: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 30.0ms | 4.915744626892696e+147 | 5.657911612343634e+150 |
| 16.0ms | 47× | 1 | valid |
| 10.0ms | 81× | 0 | valid |
Compiled 269 to 184 computations (31.6% saved)
ival-mult: 5.0ms (28.5% of total)ival-add: 3.0ms (17.1% of total)ival-cos: 3.0ms (17.1% of total)ival-sub: 2.0ms (11.4% of total)ival-div: 1.0ms (5.7% of total)ival-sqrt: 1.0ms (5.7% of total)backward-pass: 1.0ms (5.7% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 30.0ms | 4.7371744575419626e-209 | 3.558647404151274e-204 |
| 28.0ms | -3.583855042882364e+19 | -286539017070751260.0 |
| 27.0ms | 72× | 1 | valid |
| 23.0ms | 184× | 0 | valid |
Compiled 741 to 475 computations (35.9% saved)
ival-mult: 12.0ms (35.2% of total)ival-cos: 8.0ms (23.5% of total)ival-sub: 4.0ms (11.7% of total)ival-add: 3.0ms (8.8% of total)ival-div: 3.0ms (8.8% of total)ival-sqrt: 2.0ms (5.9% of total)backward-pass: 2.0ms (5.9% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 28.0ms | 4.7371744575419626e-209 | 3.558647404151274e-204 |
| 62.0ms | -3.583855042882364e+19 | -286539017070751260.0 |
| 58.0ms | 180× | 0 | valid |
| 23.0ms | 76× | 1 | valid |
Compiled 709 to 475 computations (33% saved)
ival-cos: 42.0ms (63.8% of total)ival-mult: 10.0ms (15.2% of total)ival-sub: 4.0ms (6.1% of total)ival-add: 3.0ms (4.6% of total)ival-div: 2.0ms (3% of total)ival-sqrt: 2.0ms (3% of total)backward-pass: 2.0ms (3% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 35.0ms | 4.7371744575419626e-209 | 3.558647404151274e-204 |
| 52.0ms | -3.583855042882364e+19 | -286539017070751260.0 |
| 54.0ms | 172× | 0 | valid |
| 25.0ms | 84× | 1 | valid |
Compiled 485 to 331 computations (31.8% saved)
ival-cos: 31.0ms (49.2% of total)ival-sqrt: 10.0ms (15.9% of total)ival-mult: 9.0ms (14.3% of total)ival-sub: 4.0ms (6.3% of total)ival-add: 3.0ms (4.8% of total)ival-div: 3.0ms (4.8% of total)backward-pass: 2.0ms (3.2% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 50.0ms | 2.515632587128384e+23 | 5.604219158587833e+30 |
| 56.0ms | -3.192129764299132e-219 | -4.534836696722047e-230 |
| 49.0ms | 202× | 0 | valid |
| 31.0ms | 102× | 1 | valid |
Compiled 565 to 393 computations (30.4% saved)
ival-sub: 29.0ms (46.7% of total)ival-mult: 11.0ms (17.7% of total)ival-cos: 8.0ms (12.9% of total)ival-add: 4.0ms (6.4% of total)ival-div: 4.0ms (6.4% of total)ival-sqrt: 3.0ms (4.8% of total)backward-pass: 3.0ms (4.8% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 36.0ms | 1.7207596964009822e+23 | 2.515632587128384e+23 |
| 43.0ms | -3.192129764299132e-219 | -4.534836696722047e-230 |
| 37.0ms | 58× | 1 | valid |
| 34.0ms | 166× | 0 | valid |
Compiled 415 to 302 computations (27.2% saved)
backward-pass: 21.0ms (36.4% of total)ival-sub: 17.0ms (29.5% of total)ival-mult: 8.0ms (13.9% of total)ival-cos: 5.0ms (8.7% of total)ival-add: 3.0ms (5.2% of total)ival-div: 2.0ms (3.5% of total)ival-sqrt: 2.0ms (3.5% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 16.0ms | 1.7207596964009822e+23 | 2.515632587128384e+23 |
| 45.0ms | -3.192129764299132e-219 | -4.534836696722047e-230 |
| 33.0ms | 158× | 0 | valid |
| 20.0ms | 66× | 1 | valid |
Compiled 391 to 286 computations (26.9% saved)
ival-sub: 17.0ms (42.6% of total)ival-mult: 8.0ms (20% of total)ival-cos: 5.0ms (12.5% of total)ival-add: 3.0ms (7.5% of total)ival-div: 2.0ms (5% of total)ival-sqrt: 2.0ms (5% of total)backward-pass: 2.0ms (5% of total)const: 0.0ms (0% of total)| 2× | binary-search |
| 1× | narrow-enough |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 32.0ms | -5.6569199544820926e-145 | -1.838553432374136e-146 |
| 45.0ms | -1.721558132216776e+47 | -2.036922122761847e+45 |
| 43.0ms | 143× | 0 | valid |
| 27.0ms | 81× | 1 | valid |
Compiled 332 to 255 computations (23.2% saved)
ival-mult: 9.0ms (30.2% of total)ival-sub: 6.0ms (20.1% of total)ival-cos: 5.0ms (16.8% of total)ival-add: 3.0ms (10.1% of total)ival-div: 2.0ms (6.7% of total)ival-sqrt: 2.0ms (6.7% of total)backward-pass: 2.0ms (6.7% of total)const: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 25.0ms | 1.7183695242538692e+39 | 1.5548104657585553e+40 |
| 14.0ms | 48× | 1 | valid |
| 7.0ms | 48× | 0 | valid |
Compiled 159 to 114 computations (28.3% saved)
ival-mult: 4.0ms (29.5% of total)ival-cos: 3.0ms (22.1% of total)ival-sub: 2.0ms (14.7% of total)ival-add: 1.0ms (7.4% of total)ival-div: 1.0ms (7.4% of total)ival-sqrt: 1.0ms (7.4% of total)backward-pass: 1.0ms (7.4% of total)const: 0.0ms (0% of total)| 1× | binary-search |
| 1× | narrow-enough |
| Time | Left | Right |
|---|---|---|
| 18.0ms | 1.7207596964009822e+23 | 2.515632587128384e+23 |
| 11.0ms | 33× | 1 | valid |
| 4.0ms | 31× | 0 | valid |
Compiled 117 to 80 computations (31.6% saved)
ival-cos: 4.0ms (37.3% of total)ival-mult: 3.0ms (28% of total)ival-add: 1.0ms (9.3% of total)ival-div: 1.0ms (9.3% of total)ival-sub: 1.0ms (9.3% of total)ival-sqrt: 1.0ms (9.3% of total)backward-pass: 1.0ms (9.3% of total)const: 0.0ms (0% of total)| 1× | egg-herbie |
| 928× | distribute-lft-neg-in_binary64 |
| 724× | neg-mul-1_binary64 |
| 476× | neg-sub0_binary64 |
| 436× | unsub-neg_binary64 |
| 382× | cancel-sign-sub_binary64 |
Useful iterations: 4 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 172 | 554 |
| 1 | 282 | 554 |
| 2 | 390 | 554 |
| 3 | 480 | 550 |
| 4 | 599 | 548 |
| 5 | 780 | 548 |
| 6 | 1102 | 548 |
| 7 | 1672 | 548 |
| 8 | 2105 | 548 |
| 9 | 2422 | 548 |
| 10 | 2733 | 548 |
| 11 | 2991 | 548 |
| 12 | 3123 | 548 |
| 13 | 3230 | 548 |
| 14 | 3232 | 548 |
| 15 | 3252 | 548 |
| 16 | 3252 | 548 |
| 17 | 3262 | 548 |
| 1× | saturated |
| Inputs |
|---|
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(if (<=.f64 lambda2 #s(literal 100000000000000006453119872723839559654210752410289169769835957832735809325020286556271509993374515701645382788895184180192194795092289050635704895322791329123657951217763820802932736 binary64)) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(if (<=.f64 phi2 #s(literal 214999999999999993708544 binary64)) (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))) |
(if (<=.f64 lambda2 #s(literal 5500000000000000167160300559258144204148588035168453744616916713591823222679056899109373519913437583116505349125305115209064280171462946790759165067264 binary64)) (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))) |
(if (<=.f64 phi1 #s(literal -300000000000000000 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) (if (<=.f64 phi1 #s(literal 7201235594705955/2824013958708217496949108842204627863351353911851577524683401930862693830361198499905873920995229996970897865498283996578123296865878390947626553088486946106430796091482716120572632072492703527723757359478834530365734912 binary64)) (*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -420000000000000000 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) (if (<=.f64 phi1 #s(literal 4659623031868559/1412006979354108748474554421102313931675676955925788762341700965431346915180599249952936960497614998485448932749141998289061648432939195473813276544243473053215398045741358060286316036246351763861878679739417265182867456 binary64)) (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -320000000000000000 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) (if (<=.f64 phi1 #s(literal 4942024427739381/1412006979354108748474554421102313931675676955925788762341700965431346915180599249952936960497614998485448932749141998289061648432939195473813276544243473053215398045741358060286316036246351763861878679739417265182867456 binary64)) (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) (*.f64 R phi2))) |
(if (<=.f64 phi2 #s(literal -5001010824659891/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi2 #s(literal 17499999999999999974834176 binary64)) (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))) |
(if (<=.f64 phi2 #s(literal -3497512758335037/1589778526515925949592554996185602616583051281527497329806389286938676175550849931602819490640533993421299436233862218963119697965173569936838950169642169486545361895445350303283471652486756807501069311174365664000914275178307643244544 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi2 #s(literal 214999999999999993708544 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))) |
(if (<=.f64 phi2 #s(literal -8394030620004089/12718228212127407596740439969484820932664410252219978638451114295509409404406799452822555925124271947370395489870897751704957583721388559494711601357137355892362895163562802426267773219894054460008554489394925312007314201426461145956352 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi2 #s(literal 189999999999999987417088 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -2649999999999999956467508440695018401195622400 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi1 #s(literal -2390047953351073/7029552803973744348141466418259346654483901747346744739219930582205996219799199797373501072037329464296751422864876398630012915711709843264075804970101818523648 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (*.f64 R phi2))) |
(if (<=.f64 phi2 #s(literal 3500000000000000166771400930182742147072 binary64)) (neg.f64 (*.f64 phi1 R)) (*.f64 R phi2)) |
(if (<=.f64 phi2 #s(literal 220000000000000008388608 binary64)) (*.f64 lambda2 R) (*.f64 R phi2)) |
(*.f64 R phi2) |
| Outputs |
|---|
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (fma.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi2 #s(literal 2 binary64)))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (neg.f64 (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (fma.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (/.f64 phi1 #s(literal 2 binary64))))))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (+.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64))))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (*.f64 (sin.f64 (/.f64 phi1 #s(literal 2 binary64))) (-.f64 lambda2 lambda1)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (*.f64 (sin.f64 (/.f64 phi2 #s(literal 2 binary64))) (sin.f64 (/.f64 phi1 #s(literal 2 binary64)))))) (-.f64 phi1 phi2))) |
(if (<=.f64 lambda2 #s(literal 100000000000000006453119872723839559654210752410289169769835957832735809325020286556271509993374515701645382788895184180192194795092289050635704895322791329123657951217763820802932736 binary64)) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)))) |
(if (<=.f64 lambda2 #s(literal 100000000000000006453119872723839559654210752410289169769835957832735809325020286556271509993374515701645382788895184180192194795092289050635704895322791329123657951217763820802932736 binary64)) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 lambda2 (-.f64 (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(if (<=.f64 phi2 #s(literal 7493989779944505/144115188075855872 binary64)) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (-.f64 phi1 phi2)))) |
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (-.f64 phi1 phi2))) |
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) |
(if (<=.f64 phi2 #s(literal 214999999999999993708544 binary64)) (*.f64 R (hypot.f64 phi1 (-.f64 lambda1 lambda2))) (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))) |
(if (<=.f64 lambda2 #s(literal 5500000000000000167160300559258144204148588035168453744616916713591823222679056899109373519913437583116505349125305115209064280171462946790759165067264 binary64)) (*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))) |
(if (<=.f64 phi1 #s(literal -300000000000000000 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) (if (<=.f64 phi1 #s(literal 7201235594705955/2824013958708217496949108842204627863351353911851577524683401930862693830361198499905873920995229996970897865498283996578123296865878390947626553088486946106430796091482716120572632072492703527723757359478834530365734912 binary64)) (*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 lambda2 R) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -300000000000000000 binary64)) (*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R)) (if (<=.f64 phi1 #s(literal 7201235594705955/2824013958708217496949108842204627863351353911851577524683401930862693830361198499905873920995229996970897865498283996578123296865878390947626553088486946106430796091482716120572632072492703527723757359478834530365734912 binary64)) (*.f64 lambda1 (-.f64 (/.f64 (+.f64 (*.f64 R lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1) R)) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -420000000000000000 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) (if (<=.f64 phi1 #s(literal 4659623031868559/1412006979354108748474554421102313931675676955925788762341700965431346915180599249952936960497614998485448932749141998289061648432939195473813276544243473053215398045741358060286316036246351763861878679739417265182867456 binary64)) (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -420000000000000000 binary64)) (*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R)) (if (<=.f64 phi1 #s(literal 4659623031868559/1412006979354108748474554421102313931675676955925788762341700965431346915180599249952936960497614998485448932749141998289061648432939195473813276544243473053215398045741358060286316036246351763861878679739417265182867456 binary64)) (*.f64 R (*.f64 lambda1 (+.f64 (/.f64 (+.f64 lambda2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1) #s(literal -1 binary64)))) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -320000000000000000 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))) (if (<=.f64 phi1 #s(literal 4942024427739381/1412006979354108748474554421102313931675676955925788762341700965431346915180599249952936960497614998485448932749141998289061648432939195473813276544243473053215398045741358060286316036246351763861878679739417265182867456 binary64)) (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -320000000000000000 binary64)) (*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R)) (if (<=.f64 phi1 #s(literal 4942024427739381/1412006979354108748474554421102313931675676955925788762341700965431346915180599249952936960497614998485448932749141998289061648432939195473813276544243473053215398045741358060286316036246351763861878679739417265182867456 binary64)) (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 R lambda1) lambda2))) (*.f64 R phi2))) |
(if (<=.f64 phi2 #s(literal -5001010824659891/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi2 #s(literal 17499999999999999974834176 binary64)) (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 lambda1 R) lambda2))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))) |
(if (<=.f64 phi2 #s(literal -5001010824659891/416750902054990892129990736920078612321547395144744260024766113235252327363602004470089512554472143171433119412089577527868050103382460317522709753270676877880947348719625909903942392869488376545560313508492912623855671752342278830697742336 binary64)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) (if (<=.f64 phi2 #s(literal 17499999999999999974834176 binary64)) (*.f64 lambda2 (-.f64 R (/.f64 (*.f64 R lambda1) lambda2))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))) |
(if (<=.f64 phi2 #s(literal -3497512758335037/1589778526515925949592554996185602616583051281527497329806389286938676175550849931602819490640533993421299436233862218963119697965173569936838950169642169486545361895445350303283471652486756807501069311174365664000914275178307643244544 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi2 #s(literal 214999999999999993708544 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))) |
(if (<=.f64 phi2 #s(literal -3497512758335037/1589778526515925949592554996185602616583051281527497329806389286938676175550849931602819490640533993421299436233862218963119697965173569936838950169642169486545361895445350303283471652486756807501069311174365664000914275178307643244544 binary64)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) (if (<=.f64 phi2 #s(literal 214999999999999993708544 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))) |
(if (<=.f64 phi2 #s(literal -8394030620004089/12718228212127407596740439969484820932664410252219978638451114295509409404406799452822555925124271947370395489870897751704957583721388559494711601357137355892362895163562802426267773219894054460008554489394925312007314201426461145956352 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi2 #s(literal 189999999999999987417088 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R phi2))) |
(if (<=.f64 phi2 #s(literal -8394030620004089/12718228212127407596740439969484820932664410252219978638451114295509409404406799452822555925124271947370395489870897751704957583721388559494711601357137355892362895163562802426267773219894054460008554489394925312007314201426461145956352 binary64)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) (if (<=.f64 phi2 #s(literal 189999999999999987417088 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -2649999999999999956467508440695018401195622400 binary64)) (neg.f64 (*.f64 phi1 R)) (if (<=.f64 phi1 #s(literal -2390047953351073/7029552803973744348141466418259346654483901747346744739219930582205996219799199797373501072037329464296751422864876398630012915711709843264075804970101818523648 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda1 R)) (*.f64 R phi2))) |
(if (<=.f64 phi1 #s(literal -2649999999999999956467508440695018401195622400 binary64)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) (if (<=.f64 phi1 #s(literal -2390047953351073/7029552803973744348141466418259346654483901747346744739219930582205996219799199797373501072037329464296751422864876398630012915711709843264075804970101818523648 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (*.f64 R phi2))) |
(if (<=.f64 phi2 #s(literal 3500000000000000166771400930182742147072 binary64)) (neg.f64 (*.f64 phi1 R)) (*.f64 R phi2)) |
(if (<=.f64 phi2 #s(literal 3500000000000000166771400930182742147072 binary64)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) R)) (*.f64 R phi2)) |
(if (<=.f64 phi2 #s(literal 220000000000000008388608 binary64)) (*.f64 lambda2 R) (*.f64 R phi2)) |
(if (<=.f64 phi2 #s(literal 220000000000000008388608 binary64)) (*.f64 R lambda2) (*.f64 R phi2)) |
(*.f64 R phi2) |
| 7654× | *-lowering-*.f32 |
| 7654× | *-lowering-*.f64 |
| 7228× | *-lowering-*.f32 |
| 7228× | *-lowering-*.f64 |
| 6388× | *-lowering-*.f32 |
Useful iterations: 0 (0.0ms)
| Iter | Nodes | Cost |
|---|---|---|
| 0 | 1956 | 28328 |
| 1 | 5864 | 25938 |
| 0 | 8172 | 25938 |
| 0 | 755 | 7056 |
| 1 | 2651 | 5842 |
| 0 | 8425 | 5842 |
| 0 | 1211 | 18972 |
| 1 | 4443 | 16893 |
| 0 | 8145 | 16893 |
| 0 | 50 | 272 |
| 1 | 176 | 254 |
| 2 | 757 | 205 |
| 0 | 8017 | 205 |
| 0 | 52 | 336 |
| 1 | 183 | 215 |
| 2 | 862 | 215 |
| 0 | 8417 | 215 |
| 0 | 17 | 52 |
| 1 | 46 | 52 |
| 2 | 124 | 52 |
| 3 | 476 | 52 |
| 4 | 2618 | 52 |
| 0 | 8929 | 52 |
| 0 | 17 | 16 |
| 1 | 33 | 16 |
| 2 | 71 | 16 |
| 3 | 270 | 16 |
| 4 | 1290 | 16 |
| 5 | 4270 | 16 |
| 0 | 8110 | 16 |
| 0 | 1611 | 20950 |
| 1 | 5765 | 19161 |
| 0 | 8209 | 19161 |
| 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 |
Compiled 2484 to 1483 computations (40.3% saved)
(sort phi1 phi2)
(sort lambda1 lambda2)
(negabs R)
Compiled 2528 to 1128 computations (55.4% saved)
Loading profile data...